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SHARP 


•コンパクトながら大容置 640 KB の 3.5 インチマイクロフロッピー搭 
載 (Model 20/1基，〇(^130/2基)*最大 256 KB の大容置メモリ 
(標準 128 KB ) 鲁カナの50音配列も可能な多機能キーポード春 BASIC 
やテレホンソフト使用時にも電卓機能などの特殊機能を利用できる 
便利なアルゴ(割り込み)機能•スイッチひとつで切替えできる MZ - 
2200/2000モード、 MZ -80 B モードを装備じ C 多くの資産を継承く主 
な別売品>_14型カラーディスプレイ MZ -1 D 22 標準価格108,000円 
■モデムホン MZ -1 X 19 標準価格98.000円■ボイスコミュニケーシヨ 
ンインターフヱイス MZ -1 E 26 標準価格24,800円_80桁漢字ドットプ 
リンタ MZ -1 P 18 標準価格188,000円■マウス MZ -1 X 10 標準価格19, 
800円■カラーパレットボード MZ -1 M 10 標準価格14,500円■辞害 


ROM ボード MZ -1 R 28 標準価格22,000円 ■ PERSONAL CP / MTM*i 


(WORDM ASTER™ * 2 付) MZ -6 Z 00 1標準価格16,800円 





I 8ビットパーソナルコンピュータ MZ - 2500シリーズ I 
Model 20( MZ -2511*640 KB 3.5 ヶ D 1 基付)標準価格〗68,000円 
Model 30( MZ -2521.640 KB 3.5〃 FD 2 基付)標準価格198,000円 




*1 CP / M は米 ㈤ デジタルリサーチ社のび鉍商標です。 WORDMASTER はマイクロプロインターナショナルの發鉍商標です。 


ダ tr _： Tc > 株式会《 本社〒545大阪市阿倍野区長池町22番22号 S (06)621-122〗（ 大代表）♦お問い合わせは…本社内国内情報システム営業本部まで 


圧倒的なスピードと色彩感覚 、 / 

高精細度、クーフフイツクス ///^ 

ゲ—厶に実務にすばらしい スピードを 実現。 ^ 
また、 640 X 400 ドット (標準で4 色、 日取大 16 色)、 

256色同時表示 (3 POXP □□ドットモ ー ド)のきわだつカラ—表現、 

別売のカラ—パレツトボ I ドを使えば4096色の i つち 
任意の15色を表示でさます。 

ナレーシヨンを入れたり、 

楽器音もつ くれます。 

自分の声や電話からの声を吹$ 込んだり、 音楽も聞ける ボイスレコーダを 搭載。 
※ボイスメール や"留守番電話といったテレコ///ユニケーシヨンに利用できる ほか、 
ナレ—シヨンを入れた個性あるソフトが自由につくれます。 

また、きれいな FM 音源 8オクタ—ブ3重和音)も採用しました。 

※テレホンソフトの通信機能を活用するためには別売のモデムホンが必要です。 

日本語がハワーアップ 

JIS 第2水準漢字 ROM も標準装備。 

JIS 第1水準に加えて 第2水準漢字 もサボ—卜。 

漢字 BASIC ( M P 5\ SP 5) を採用したきわだつ日本語処理機能。 

プログラム中の変数や配列 名、 ラベル名などに漢字が使え、変換もスピ—デイ。 
別売の辞書 ROM ボードを使えば 文節変換 も GK です。 












写真は Model30 です写真の14型カラーディスブレイ、 

モデムホンは別売です.また本体に装着されている 
カセットテーフは彳最彩用で、付属品‘市販品ではありません n 
画面はハメコミ合成てす 




本格 テータ ベ ース 機能がうれ L 
〃テレホンソフト" 標準 装備。 


話題の巳巳 S (電子掲示板)にアクセスできる ターミナル機能 や データ通信機能に 加え、 
登録件数最大4,000件の 本格的な 力 I ド型データべース機能を 装備。 

住所録から顧客の管理まで幅広く使えてとても便利。 


八—ドの凄さに応えたすばらしい 
ソフトです。 

※テレホン ソフトの 通信機能を活用す るためには 
別売のモデムホンが必要です。 


'こ 
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表紙絵 ： MORIHO TANAKA 


UNIX は米国べル研究所で開発されたソフトウエアです。 
VENIX はペンチヤーコム社 

CP/MPCP/M.CP/M-86.MP/M は Digtal Reserch 社 
XENIX.MS-DOS は Microsoft 社 
F し EX は TSC ネ土 

UCSD p-System はカリフォルニア大学理事会 
RACET NECDOS は RACET COMPUTES 社 
SB-80.SB-86 は LIFEBOAT ASSOCIATES 
WORDSTAR.MAI し MERGE.SPE しし STAR.WORDMAST 
ER.CA し CSTAR.DATASTAR.SUPERSOFT.INFOSTAR 
は Micro Pro 社の各メーカーの登録商標です。 

その他ブログラム名，システム名， CPU 名は一般に各メ 
一力一の登錄商標です。 

本文中では “ マークは明記していません。 

本誌に掲載されたすベてのブログラムは著作播法上，偃 
人で使用するほかは無断で複製することを禁じられてい 
ます。 



BASIC “ 行動学”入門 


41 

暇プロの楽しみ 

泉大介 

42 

グラフィックて'遊び'たい 

堀内保秀 

45 

BASIC 探検隊 

中川智哉 

48 

機械へのインタフェイス 

莱野雅彦 

51 

ポケコンを使ってみよう 

高原ひでき 

55 

求む究極の BASIC 

祝一平 

58 

専門誌の正しい読み方 

挙市哲司 

60 

入門ミニミニプログラム 

吉田幸一 

63 

必殺バグ退治のテクニック 

浅野恵造 

70 

BASIC プログラム移植の心得 

ェ藤誠 

76 

他誌を 10 倍楽しむ方法 

BASIC DATA し 1 ST 

風間浩 

81 



CG Gallery by XI/XI turbo 


カラーイメージボード:/印刷ごっこ 

SUPER RAM BOARD でアニメーション 

30 

ずらりと揃った RAM ボード 

32 

THE SOFTOUCH SPECIA しノミネート決定 

GAME OF THE YEAR 1985 

129 



Part.l ソフトて’ワイワイ 

新作 SOFTWARE/OOY JOY PACK Special 


Part. 2 清水和人のゲームハイテク道場 

RPG 4 作品リザード 他 


132 

136 


Part. 3 GAME REVIEW 

ドルアー ガの 塔/チヤン ピオ ンプロレス Special 1 38 

NOBO / 軽井沢誘拐案内 

Part. 4 SPECIAL REVIEW 

印刷工房 U0 



ペンギン情報 コーナー 197 

Again Watch 198 
愛読者プレゼント 200 
FI し ES Oh ! MZ 208 


infoMZ 210 編集室から DRIVE ON / ごめんなさいの コーナー 

霧降高原からフアジィのように風します 211 投稿募集 / SHIFT BREAK/micro Odyssey 218 

Oh!MZ 質問箱 212 

STUDIO MZ 214 





















シャープパーソナルコンピュータ MZ -2500 

コンピュータ本体 MZ -252 I 198,000円 

MZ -25 II 168,000円 
カラーディスプレイ MZ - ID 22 108,000円 



mm 
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THE 部品箱（182ページ) ▲ 



THE SENTINEL 
リロケー タブ/レの お 話 
FM 音〗 原サウンドェテ 、イタ 


LOGO ふたつの顔——第1回 

タートルグラフイックスの世界 

ビジネスソフトへの対応 : 一 m 

Multiplan の基礎知識 

試験に出る第8回 

FDC は挑戦的である 

マシン語体操卜2,3第2講 

計算の極意は旗にあり 

ますますツメターイ BASIC 塾第2講 

グラフィクス&グラフ 

全機種共通詩人になりたいひとのプログラム 

ザ•コピーライター 

1500/700 USERS ’ BU しし ETIN 2 

MZ -1 500バーコードリーダ応用術 

MZ -1500 サーキットエディタ 

THE 部品箱 

X 1/ X 1 turbo 3 D マルチ CAD く最終回〉 

気分をマルチに 

テストレポート MH 024 「割付名人 j 

インテリジェント漢字プリンタ 


■広告目次 

アイビット電子 . 224 

ウラカワ電器店 . 223 

141 S B C ソフトウヱア . 16 

疋田孝 142 じニニニ=ニニニ 

^し明 エレクトロハウススガヤ . 231 

多画正数 U5 2 ;:::::::::::::::::::::::: 二 

キャッッアイ . 196 

キャリーラボ .14*15 

コスモス岡山 . 230 

サムシンググッド . 10 

向原あゆむ 33 シーレックスサングラス . 221 

J & P . 表 3 

シャープ . 表2韻 .1.4 〜9 

増田亨 114 ソフトプロ . 26 

ハドソン . 24*25 

ビクター 音楽産業 . 23 

祝一平120 7 バ- . し 13 

BLUE SKY Co .. 225 

BASIC HOUSE .226*227 

ボーステック .20 

泉大介 160 マィクロネット . 18 

マイクロポート . 232 

マイコンシステム企画 . 222 

高原ひで、き 167 マイコンハウス SDS . 22 

ラウンドシステム研究所 . 229 

ランダムハウス . 19 

ェ藤誠 172 

辰己卓 175 

佐藤信夫 182 

小澤尚 191 

202 


リザード （136 ページ) ▲ 


SYSTEM HARDWARE REPORT 

MZ -2500, XI / XIturbo の拡張メモリボード 

MZ -1500 用 POCKET DB PA -301 

ポケットデータベースを街で使おう 


204 


206 


くスタッフ〉 

•編集長 一 安田千尋•編集 —— 前田徹土平章博永野仁菊川良子三上之彦 •協力 ——有田隆也高野庸一西畑文広 Itti Rittaporn 河本恭 
彦清水和人後藤貴行林一樹斎藤亮近藤弘幸浅野惠造エ藤誠茗原秀幸小森隆挙市哲司參カメラ —— 浜崎昭杉山和美•イラ 
スト —— 永沢しげる山田晴久 •アートディレクタ-中島真子 •レイアウト —— CAN ART 元木昌子中島由紀子 •校正—— グループごじら 



一し ビジネス/ DOS/ ハード 




-a>h?-W 仆 4 ： 


シ 1 J ーズ全機種共通モニタ CIOS 


H T 
G F 
IrDIDDE 
RRRRRL 
AA AA 
WWNWWN 
RRRRRR 

ouoou 
ftfft 


EEEEE 

vvvvv 
00000 




















































時代に応える、 3 つの能力。 



パーソナルコンピュータ+キーボード CZ -856 CE . 標準価格178,000円 


パーソナルコンピュータ+キーボ ード CZ -856 QE 」. 標準価格178,000円 

15型カラーデ<スプレイテレビ CZ -855 DE . 標準価格119,800円 


•使いやすさと高度な能力で好評の漢字 BASIC 搭載#漢字1000文字表示などレベルの高い表現が可能、 640 X 400 ドットフルカラーの高速.高 
密度グラフィックス❿ビデォをつなぐだけでスーパーインポーズ録画ができるデジタルテロッパー機能内蔵籲 JIS 第1水準漢字 ROM 標準実装#5インチ 
ミニフロッピーディスクドライブ2基内蔵#マウス、 RS -232 C など充実のユーザーインターフェイス春豊富なソフト資産が活用できるコンパチブル設計 























SHARP 


XI ターボ II 、新発売。 


漢字処理を超えた新 • 日本語処理 

日本語百科 UIDRD PDUJER w バヮ- 


単なる漢字変換にとどまらず：表現を考えながら文章づ〈りができる 
新しい日本語処理機能です。一般熟語のほかにも関連する語句や 
表現を豊富に内蔵。たとえば類語、同義語、同音異義語、四文字 
成句、故事•ことわざ、手紙の慣用表現など、収録語数は約9万語。 
JIS 第2水準漢字も強力にサポートしています(漢字 ROM 別売)。 
しかも使いやすさを考慮した多彩な検索方法を採用。正確な読み 
方や意味がわからなくても、表現したい語句が容易に探し出せます。 

•「ヨロ コブ」 で語句を検索したときの出力例 

悦歓喜空喜大喜糠喜嬉喜悦愉悦満悦恐悦 
歓喜歓心欣喜雀躍欣喜狂喜驚喜隨喜法悦欣幸 
浮かれる※ r 喜懌臺.驩權怡歡1•斤憙兌 

※印以下は第2水準漢字 


ターボ博士 LESicun レキシコン 


ターボの優れた日本語处理能力を BASIC に活かした独自の応用 
機能です。やさしぃ日本語見出しの入力で BASIC コマンドの用法 
や書式をすばやく検索でき、即実行できるサンプルプログラムも収 
録。初めての人やコマンドの読みのわからなぃ年少者にも使え、また 
使ってぃるうちに自然に BASIC が身につきます。さらに上級者に対し 
ても、頭文字によるコマンドやステートメントの検索ができるなど、プロ 
グラミング効率を考慮したシステム設計です。 

春円を描くコマンド•書式•用法を知りたいとき 
エン— CIRCLE: 円を描きます 

CIRCLE— 円•楕円または半円を描きます CIRCLE (円の中心 
点），半径，弧の色，偏平率，初期角•終了角例 CIRCLE (50， 
50)，50, 6,1，0, 360注意偏平率を指定すると楕円になります 
初期角•終了角を指定す ると 半円になります参照 POLY CIRCLE 


2 


カラーイメージボードによる静止画入力なと多彩な画像処理 

別売のカラーイメージボードを使えば、テレビ、ビデオ、ビデオカメラ、ビデオデ r スタなどの映像を 
パソコンへカラー静止画像としてとり込めます。画像は拡大•縮小•切り抜きなど修正•加工ができ、 

アートワークの ツールと してはもちろん、画像ファイルの応用にも使え、ターボ II による C . G . の世界がさらに 

面白〈なります0参 1 画面分の転送は約〇. 2 秒というハイスピード(ターボ II 使用時）•スーパーインポーズ機能を利用したテレビインテ 
レビ、4分割 *16 分割画面によるマルチストロボアクション効果も可能 

■ CZ -8 BVI ( XI シリーズ/ xuurb 。 シリ-ズ用) 標準価格39,800円 



3 パソコン通信をサポートする turbo ターミナル 

別売の通信ソフト'、 turbo ターミナル"を使えば、 「 TeleStar 」 や「アスキーネットワー 
ク」など、話題のネットワークにアクセスしたり、パソコン間のデータ通信（漢字対 
応)がスピーデ f に楽しめます。モテ''ム付電話を使用した場合には自動発信/自動着信も可 

能です 0 •登録されているネットワーク/「アスキーネットワーク J . rTeleStarj . rJ&P HOTLINE 」. 「」八1_旅行情報 

「日太マイコンクラプ I 

ICZ - 131 SF ( X 1 turb 0 シリーズ用/ 5、2 DFD 版) 標準価格8,800円 


システム」•「日本マイコンクラフ ; j 



• RS -232 C 用ケーブル 
CZ -8 LM 1 (平行接続型）標準価格7,200円 
CZ -8 LM 2( クロス接続型）標準価格7,200円 
※公衆回線を使って通信する場合、モデ 
ム付電話か、音響カブラが必要です。 


SK 17 発売3周年記念キャンペーン実施中./〈期間、 rndl 月16日月15日〉 

E 期間中 XI 、 xi ターボをお買い 
上げの方にもれなく x 1ロゴクリ 
スタルブロックをさしあげ'ます。 
S 3 周年記念 turboll 限定モデル 


[ I 豪華賞品が当たるキャンペーンクイズ 

[^§11 下記の （ >の中にあてはまる数字をお答えください。 

① パソコンテレビ x () ② 新製品 XI turbo () ③ XI 発売 （） 周年 
I 賞品]■シャープ VHS ムービー ( VC - C 10) 3名様■ンャープドットプリンタ （ CZ - 
8 PD 2 S ) 15名様 _ X 1 オリジナルインテリアファブリックス (2 本組）300名様 


I 応募要項]參応葬方法:官製ハガキに①クイズの答え②氏名③住所④年令⑤職 
業⑥パソコン歴を明記のうえ下記あて先までご応募ください。干 5 45大阪市阿倍野 
区長池町 22-22 シャープ株式会社システム機器営業部 XI キャンペーンクイズ係 
•締切:昭和61年1月15日（当 H 消印有効） 

•発衣:締切後厳正な抽選の上、賞品発送をもって発表にかえさせていただきま1； 


ブラック仕様発売 


籲パーソナルコンピュータ+キーポード CZ-856CB 
_ 標準価格178,000円 

•15 型カラーディスプレイテレビ CZ-855DB 

標準価格119,800円 



株式会 W •お問い合わせは…シャープ ㈱ 電子機器事業本部システム機器営業部大阪/〒545大阪市阿倍野区長池町22番22号 0(06)621-1221 (大代表） 
東京/〒162東京都新宿区市谷八幡町8番地 S (03)260-1161 (大代表)またはシャープエンジニアリング ㈱ 〒545大阪市阿倍野区長池町22番22号(大代表）へ。 































礙 ，上■翁:て 

'.しつ》::パ®*■一..、 


疾走するクラフィックス 

XKUf 発進 0 



Model 20 (ミニフロッピーディスクドライブ 1 ドライブ内 ») 


Model 1〇(«速霣磁メカカセットデータレコーダ内蔵） 





• Model 10パーソナルコンピュータ+キーボード CZ -811 CE (オフィスグレー) . R (ローズレッド） 標準価格89,800円 

• Model 20パーソナルコンピュータ+キーポード CZ -812 CE (オフィスグレー） .R (ローズレッド) 標準価格139,800円 

• 14型カラーテ V スプレイレイテレビ CZ -811 DE (オフィスグレー) . R (ローズレッド） 標準価格89,800円 










高速ペイント ルーチンの 採用で、ペイント 
速度は従来の約35倍 (XI BASIC V 1.0 
との 比較） のハイスピード。 中間色表現も 
簡単です。さらに LINE 文や PAINT 文も 
スピードアップ。コンピュータグラフ作クスが 
いよいよ面白くなります。 


漢字処理もパワーアップされて、日本語が 
さらに身近になりました。わずらわしかった 
漢字入力が、カナ漢字変換でとても簡単。 
Model 20では、一字変換のほか音訓変 
換もサポートしています。もう プログラム にも 
どんどん日本語が使えま 


#スーパーインポーズ機能：リアルな実写と色鮮ゃ 
力、な C . G . の合成、パーソナルテロッパ(オプション)や 
ビデオマルチプロセッサ(オプション〉と組めば本格的 
なビデオ編集が楽しめます。修5インチミニフロッピー 
デ^クドライブ搭載 (Model 20): 大量のデータを 
高速処理、パソコンの活躍の場が一気に拡がりま 
to •漢字 ROM 内蔵 （ Model 10はオプション） 
•大容量 122 K バイト RAM 標準実装（メインメモリ 
64 K バイト）#8オクターブ3重和音のサウンドゼネ 


SHARP 


/高速グラフィック 


2\ 広がるメモリ空間 _ 

10段階の NEW 0 N 命令 （0 〜 9) でユー 
ザーエリアを拡大。 Model 20では最大 31 K 
バ仆、 Model 10では最大 33 K バ仆と、テし 
夕の多いプログラミングにも対応。活用分 
野がより拡がるうれしい仕様です。 


4 フルコンパチフソレ設計 _ 

従来の XI BASIC ( Vl . O ) も搭載。 XI シリ 
ーズで蓄積された優れたゲームソフトや学 
習ソフトの数々、さらに充実 U ： きたワープロ 
や データベース などの市販アプリケーション 
がそのまま使用できます。 


その日から楽しめる 
ソフトパック 

n The YOKOZUNA ，， 

•テープ版 



人気のゲーム、ワープロ 
ソフトなど家族そろって使 
えるソフトを6本セットで新 
発売、初めての人でもすぐ 
に楽しめま1"。 


•5 インチディスク版 


レータ•拡張 I / O ポート (2 ポート）内蔵•タイマー 
つきカレンダークロック内蔵 


主なオプション(価格は標準価格） 

參增設用ミニフ□ッヒしディス外ライプ ( Model 湖） CZ -52 F 

34.800円 

•熱転写漢字プリンタ 

CZ -8 PN 1 

134,800円 

•漢字 ROM 

CZ -8 BK 2 

19,800円 

•パーソナルテロッパ 

CZ -8 DT 2 

44,800円 

參ビデオマルチプロセッサ 

CZ -8 VP 1 

59,800円 

秦 データレコーダ 

〇 Z -8 R し 1 

24,800円 



お手持ちの XI シリーズを 
パワーアップさせる 
NEW BASIC ( V 2.0) 
発売中/ 


CZ -122 PF 標準価格15,800円 

1. ユーカラ JJ (ワープロ）※ 


CZ -123 PF 標準価格19,800円 

1. ユーカラ JJ (ワープロ〉* 


XI シリーズのすべてのマシンが、この NEW 
BASIC ( V 2.0) によって生まれ変わり、素晴 


2. キーポード練習（タイピング練習> 

3. SUPER ODYSSEY (音楽演奏） 

4. 野王求狂（シユミレーシヨンゲしム） 

5. フラッピー（リアルタイムアクションゲーム） 

6. 嬉楽画（グラフィックツール） 


2. HARUCHAN (フアミリーソフト}※ 

3. SUPER ODYSSEY (音楽演奏） 

4. サンダーフォース（リアルタイムアクションゲーム） 

5. デゼニランド(アドベンチャーゲーム） 

6. 嬉楽画（グラフ f ックツール） 


嵌 X1、X1Cs、X1D、X1F Model 10、XI turbo で使用する場合にはXIシリーズ用の漢字 ROM(CZ-8BK2 又は GZ-8KR) が必要です。 


らしいグラフィックスの 世界や手軽な漢字 
入力が体験できます。 


■カセット版 CZ -112 SF 
_2 D .3 V FD 版 CZ - I 13 SF 
■2 D .5 "FD 版 CZ -124 SF 


標準価格7,800円 
標準価格8,800円 
標準価格8,800円 


ガ和-及株式会《 •お問い合わせは…シャープ ㈱ 電子機器事業本部システム機器営業部大版/〒545大阪市阿倍野区長池町22番22号 0(06)621-1221 (大代表） 
東京/〒162東京都新宿区市谷八幡町8番地 0(03)260-1161( 大代表）またはシャープエンジニアリング ㈱ 〒545大阪市阿倍野区長池町22番22号〇(06)62卜1221(大代表)へ。 



































SHARP 


m 


_ 





日本語処理機能、 

いよ t 'よ充実。 

XI ターボの標準巳 ASIC との 
併用により熟語変換が可能 
な「システム辞書」 と、 ユー 
ザーが自由に文字を登録でき自分専用の 
オリジナル辞書がつくれる「ユーザー辞書」 
のユーティリティからなるソフトウェアです。 
システム辞書には、標準 BASIC の音訓辞 
書のほとんどすべてと、日常よく使われる 
熟語、人名、地名など約3万語が収録され 
ており、さらに辞書変更用ユーティリティを 
利用すれば、内容の追加、書き換えも 0 K 。 
またユーザー辞書は、自分専用の辞書と 
じ T の活用の他、住所録や電話帳などにも 
応用できます。 

■2 D .5. FD 版 CZ -111 SF 標準価格8,800円 


スー/ V 。ーイ ンポーズ 画像 
作成に、ビデオ編集に。 

わかりやすいアイコン表示 
で、プログラムの組めない初 
心者の方にも、複雑な コン 
ピュータ画像を楽しみながら手軽に作画 
できるうれしいグラフィックツールです。入力 
は、マウスでとっても簡単。精密400ライン 
モードも装備じ r います。さらにビデオマルチ 
\プロセッサ （ CZ -8 VP 1) の入力切換 
えを コン ト ロールで きるタイム テープ; レ 
機能を装備。ビデオ編集にたいへん 
_ 便利です， 

くアイコン表示によるグラフィックコマンド〉 

參ライン春ボックス參ボックスフル參サークル籲ペイント 
♦スプレー*ブラシ參パレット參ルーペ 

■20.5下0版〇71〇〇^120、30、40用） 
CZ -114 SF (マウス付) 標準価格17,800円 





ヒューマンな LOGO で 
ターボは 進化する。 

新時代の言語 LOGO がいよ 
いよターボで走ります。絵や 
グラス模様などを簡単な命 
令でわかりやすくプログラミングできる夕一 
トルグラフィックス機能をはじめ、構造化プロ 
グラミング機能、優れたリスト処理機能など、 
巳 ASIC などの言語にはない独自の機能を 




ネ寺つ LOG 〇 - とりわけこの turbo LOGO 

(漢字版）は、プロシジャーや変数、データ 
に漢字をサポート。日本語 LOGO とじ T の 
やさしさに加え、マウスを使って絵を書いた 
り、プログラミングもこなせる多機能ぶり。 


このヒューマンなソフトウェアによってあなた 


の知的創造の世界はさらに拡がります。 


■2 D -5' FD 版 CZ -117 SF 標準価格18,800円 























❼ 








いずれがキヤビアカ 


L 、わばアビタイザーからデザートまで、メーンデぐンシユの XI をひきたてる ▲ 
ピリッと効 L 、たおい U 、ソフトた *bo 
I 、ま洗練の/、ードに応えて、オリジナルソフトの輪がどんどん拡がって L 、ます0 


ターボに 迫る 
痛速グラフィックを実現。 


XI シリーズに待望のニュー 
日 ASIC が登場しました。まさ 
にターボなみの高速グラフィ 
ツク。高速ペイントルーチンの採用でペイン 
卜速度は従来の約35倍 （XI BASIC V 1.0 
との比較）。さらに X 1ターボで好評の NEW 
ON 命令による BAS 1 C の10段階カツト機能 
も導入、ユーザーエリアを拡大できます。また 
漢字機能もパワーアツフ°。漢字ユーティリ 
ティのサボートで漢字の扱いがさらに身近 
に。まさに XI ユーザーには見逃がせない 
BASIC です 0 


■カセット版 CZ-112SF 標準価格7,800円 
■2D_3"FD 版 CZ-I13SF 標準価格8,800円 
■2D-5TDKSCZ-124SF 標準価格8,800円 


■各 2D«5”FDR5 各標準価格13,800円 

科学技術計算^分.に適した高級言語 

FORTRAN (czii5lf) 

事務分野で威力を発揮する伝統の言語 

C 05 Q し— ( CZ -118 し F ) 

人工知能研究の中心的言語 
LISP ( CZ -120 し F ) 

いま熱い視線を集める C 言語 _ 

C ( CZ -116 LF ) 

話題の人工知能言語 

PROLOG ( CZ -119 し F ) 

拡張性に優れたスクリーンエディット型言語 

FORTH ( CZ -121 し F ) 

系統的プログラミング設計に適した言語 

PASCAL ( CZ -125 し F ) 

文法が明快な数学的プログラミング言語 

APL ( CZ -126 し F ) 


「 TeleStar 」 や「アスキーネット 
ワーク j など、話題のネットワー 
クにアクセスしたり、ハ。ソコン間 
のデータ通信（漢字対応）が 
スピーディに楽しめる通信ソフ 

卜。モデム付電話を使用した場 - 1 

合には自動発信/自動着信も可能です。 

■ XIturbo シリーズ用 5、2 DFD 版 

CZ -131 SF 標準価格8,800円 

• RS -232 C 用ケーブル CZ -8 LM 1 (平行接統型）/ CZ - 
8 LM 2 (クロス接続型）各標準価格7,200円 
* 公衆间線を使って通信す る 場合.モデム 付窀 活か 音赞 カブラ 
が必要です。 


ランゲージマスター ( CP / M ®) 

_2 D *5 B FD 版 CZ -128 SF 標準価格9,800円 

※〇卩/!"は米国デジタルリサーチ社の登録商標です> 
►ラン ゲージシリーズの使用にあたっては、ランゲージ マス 
ターまたは CZ- 5 CPM が必要で 1； 

人気のゲーム、ワープロソフトなど 

家族そろって楽しめるソフトの6本セット_ 

^5^/7 シリーズソフトウェアパック The YOKOZUNA 

籲テープ版 CZ-122PF 標準価格15,800円 
春5インチデ<スク版 CZ-123PF 標準価格19,800円 


表計算用簡易言語として 
高い評価を得ているあの 
「 Multiplan 」 がターボで走 
ります。計算•作表のための 
豊富な機能に加えて、操作 
しやすいコマンド メニュー 方式、高度な 日本 
語処理など、高機能と使いやすさを実現し 
たビジネスソフトです。また増設 RAM (64 KB ) 
の使用により、処理スピードを早めています。 

■ 2 D .5 ，FD 版 （ Model 20、30、40 用） 

CZ -127 MF 標準価格49,800円 

•このソフトの使用にあたっては 2 D . 5_ FD が2基必要です。 

« Multiplan は米国マイクロソフト社の登録商標です。 


ガ秒-^株宝•お問い合わせは…シャープ ㈱ 電子機器事業本部ソフト開発部〒脱東京都新宿区市谷八幡町8番地 0(03)260-1161 ( 大代表）へ。 




































ワーフ° 口のスタンダニド 



ライバル I 


日本語ワードプロセッサ 


l B ビ 

jzsc 宝 \ 



■/VRP ^SJJ • 用 

〈 _ 戦播 ® SSI 

これが、8ビントワープロの新しい規準 


_ 主な仕 様 _1 

參&属品ノ5分間 マニュアル 參文例集ビジネス文害ディス 
ス文窨50例登録）籲漢字/ JIS 第一水準 dlS 第二水 
_文字•文字種全角、半角（英数字カタカナ）、倍角、！4角 
、I 败字 j 、 上つき、下つき文字♦外字40字 （16 X 16 ドット 

’ \または;4><24ドット）•画面制御上下 スクロール、 左右ス 
VVI (最大8辟）、前酬 • 次®醜示、貞喊•文頭 • 
し、頁•行 • 桁位置表示•印刷印刷枚数 • 用紙 


P 刷範囲 • 横害 • 縦書 • 


-行文字数、文 


8ビットマシーンの能力を限界まで弓 I きだした、卓越 
の テクノロジー 


く即戦力〉が、8ビットマシーンの潜在能力を、見事に目覚めさせ 
ます.ハイレベルな変換効率を誇り登録淌4万語、熟語•短文. 
外字登録の充実の辞害機能、最高速の変換スヒード、倍角や 
1 4角等の豊畜な表現力、移動や複写さらに検索や置換え等の 
強力な編集機能、多彩な印刷機能等、これまでの8ビットワーフ 
口では考えられなかったバフォーマンスを実現していますしか 
も、初めての方でもディスプレイ画面に表示されるガイドによ 
リ簡単に操作できますから、まさに導入と同時に即、戦力とし 
て活用できます優しく入門できて、使いこむほど高機能を発 
揮するく即戦力〉、これこそ8ビッド7—フロの新しい規準です 

キーに 情れ るのがこあなたの仕事あとはく即戦力〉が フオロ 
一し ます、 


ほんとうに使いやすいワープロは、どうあるべきか。 
サムシンググッドからの、回答です0 

単にできる機能があるということと、本当に使えるということ 
は、違うとサムシンググッドは考えます私達は、一つ一つの 
機能をほんとうに使えるところまて質を高めたうえて.はじ 
めて搭載しています例えは、辞軎機能一つとっても、登録 
語数の多さだけでなく、その内容を充実させていますビジ 
ネス文書や、新聞、雑誌、小説、論文等から「活きている 
言葉」を集録していますこの筲に加え、4万語という貼： 
大な量を持つことて、ハイレベルな変換効率を可能.にした 
わけですここにく即戦力〉の使いやすさの、最大の理由か 
あります私達は「機能の質」ともいうべき高機能と、「俾 
能の里」てある多機能の同時追求か、使いやすいワー 
フロの条件てあると信じます.高機能を核上けて、多機能 
を創りあげる、これかサムシンクグットの基本てす 


f 間痛.改行幅（用紙の大きさにより自動設定）、差し込み印 
刷、宛名_き印刷、袋とじ印刷#文軎管理文窨名登録（か 
な漢字ま t り15文字まで）、文軎名変更、文害名一烷表表示、 
文害複写、文書削除、文害併合#辞軎5 2 D 登録済4万語以 
上+ ユーザー 登録8.000語 (40 K ) •レイアウト中央寄せ•右 
寄せ • 左寄せ、下線、網かけ、改行 • 改頁籲プリンター機棰 
SHARP CZ -800 P 、 CZ -8 PD 2、 CZ -80 PK 、 CZ -8 PK 2、 CZ - 
8 PNKMZ -1 P 03, MZ -1 P 06、 MZ -1 P 07、 MZ -1 P 08、 MZ -1 P 10、 
MZ - IP 1 U MZ -1 P 14、 MZ -1 P 10 A . MZ -1 P 11 A EPSON RP 
•80、 RP -80 K 、 RP - 8011、 RP - 8011 K 、 RP -80 F TIU RP -80 F 
Tll . K 、 FP -80、 FP -80 K 、 UP -130 K(ESC P 、 PC )、 IP -130 K 
(ESC P s PC ) NEC PC - PR 10 K PC - PR 20 K PC -8822 

♦ユー ティリティ ー 文 害 ディスクのフォーマット • ハヘンクアッ 
フ•コビー、 辞書 ディスクのハ•ックアップ、文 ft —U 表の印 
刷•短文登録16個（読み方最大12文字、短文最大120文字） 
.卜本イ士枝は SHARP XI XUurlj (，用のものてす 


16ビットシリーズ好評発売中/ 

1 VECPO 980 I 用 

く即戦力〉•く即戦カスーパー〉 


E 1 MJX 3/4 用く即戦力〉 


人を大切にする テクノロジー 

株式社ムシングクッド 

十-160栗京都新宿区大久保2 5 20シティプラサ新宿 3FTEU)3(232)0801 








¥147,000 


本体価格 

«写真はカットシートフィーダ （ ¥ 15,000) を装簷したものです。 


本体価格 


¥177,000 


※写真はカットシートフィーダ （¥25, 000)を装着したものです。 


ドットマトリクス漢字プリンタエプソン VP - 日 OK ドットマトリグ^漢字プリンタエプソン VP -1 彐 OK 

•エプソンプリンタが誇る優れた機能を継承した経済価格の24ピン漢字プリンタ。•完成されたインパクトドットマトリクス方式に よる、 抜群の信頼性•耐久性。•英数•カナ 
•新たに4倍角、縦2倍角も追加した豊富な漢字印字モード。•パーソナルなワープ文字120字/秒、漢字40字/秒、高速設定時80字/秒の高速印字。#用紙を自動供給 
口文書にも手軽に使える80桁印字、ビジネス文書に威力を発揮する136桁印字と用途するカットシートフィーダを、お求めやすい価格で用意。# ESC/P を標準装備。XI対応 
に応じて選べる2タイプ。•書体は両機種ともにオリジナルデザインの美しい明朝体。プリンタカートリッジ(オプション ¥14,00 0) でXI Turbo、X1F、MZ- 2500に簡単対応。 
■VP-80K.VP-I30K はXI対応 プリンタカートリッジを 使用して Xlturbo、XIF に接続することにより、漢字出力、ハードコピーおよびリスト出力（文字コード 表一 致)が可能です。 MZ- 2500は漢 
字出力、ハードコビーおよびリス ト 出力（グラフィックキャラクター部不一致）が可能です。（注）アプリケーションソフトウェア使用の際、 UP-I30K または VP シリーズがサボートされて いる 場合には 
専用力一トリッジは必要ありません。 


•エプソンのプリンタは、巳 SC/p 1 ' "のもとに夕ーミナルプリンタ•コントロールコード体系の世界統一規格を提唱し製品開発されています。 










M 

.ぜ 


PC -88-98 シリーズ対応 


' 二， ぶ 

職__ 




MSX 機に対応 


w ^bgicwi I i ^ jJMW 1 -1 «1*|1|1) ||| 11 iMau 1 ;_l 叫 PlWpOyX 


、宛先人住所データ No .2 


•まず郵便番号を。次に住所 • 
氏名を頭ぞろえで連続イン 
プット® 

•差出人、宛先人データは、漢 
字16文字 X 6 行の範囲で自 
由にレイアウト 0 

•宛先人氏名は、見やすい縦 
倍角表記。© 

•デ f ッブスイッチで縦でも横で 
も自由自在に印字可能、また 
差出人住所•氏名を印字しな 
いことちできます 0 

•住所データの右側を備考欄 
として活用することもできます。® 


※用紙は官製はがき、もしくはそれに準ずる厚さのものをお使いください。 



、ご好評の 
:ーソナル 
プリンターシリーズ 


世界最小的桁シリアル9ドットインパ外プリンター 


•各種アプリケーションソフト、又はハードコピーにて 
ビットイメージで漢字が打てます。•ファンフォールド紙、 
ロール紙が使える3ウェイ•ペーパーハンドリング機能。 
•コビー枚数：オリジナル +2 P •印字速度： 50文字/ 
秒 ( M - I 009)、 40文字/秒 ( M - I 009 X ) 參重置：約 3.0 kg 




FM シリーズ対応， 


• MSX . PC シリーズ対応 


¥49,800 


[MHI 回回 


18ドット対応、 

熱転写灌字ブリンタ- 

•漢字が鮮やか、 16 X 15 ドット 
構成。 參ほぼ A 4 サイズのコンパ 
クトボディ。•乾電池駆動で、 
機動性抜群。 

オプション： 

漢字 ROM カートリッジ 
( JIS 第 I 水準） 

HR -6 X ¥30,000 



¥49,800 




PC -88、98 シリ-ズ 
に対応する日本語 
ワープロソフト（ユーカラ、 
テラ…）顧客管理ソフト 
(駿漢、新漢客…)な匕あら 
ゆる市販ソフトが使えます) 

•NEC NM - 930 0 S とコンパチブル。 

PC - PR 201 にも対応。 

• MSX 対応24ドット漢字プリンター。 


はがきの印字フォーマットをプリンターが内蔵し 
ているので市販の日本語ワープロソフト•顧客 
管理ソフトなどにより定位置にカンタンに印字できま1"。 



ヽ差出人住所データ 


ヽ宛先人住所データ No.l 


费「•使はが 5 

000-回回 


麻岡郡 s 间村松島1〇 3番地 
松 ft アパート3棟30 8号 


©村阔 E 接 




世界初の24ドットインテリジェント 

市販の鱗ワ 
㉗ はがき印字が 
③定型書式印字 






® 〒1 04-0 1 ⑧ 

40 K 都中央梅3 — 3 — 8 
新*掐ビル3 F 
ブラザー販充株式会社 

悄報梭 器唞龙部货龙部 
PUB 


PUBU . プラザープリンターを 
こ•使坩胡いているユーザーの 
友の会です J 

会贷の方には , PUB MEDIA が 
定期に送られます。 


亍 438-02 

靜阐 WK 田郡 B [岡村松 ftL 0 3番地 
松岛アパート3揀308り 

村岡幾三様 


(備芩欄） 

本 体： PC -8801 SR 
ブリンター： HR -6 X 
生年月日:昭和29年 11 H 12 IJ 


〒1 08-03 

東京都港区 -. IH 3-20- 18 
•出駅 l?j •ビル25 F 
來京ゾフト明発株式会社 
開発部汶叶5漯 
; . IH 太郎 tt 


(備考欄> 

本 体： PC -9801 F 
プリンター: M -1024 P 
生年月11:昭和26年10«8» 



3 営 
| F 社 
33会部！！？ 
描ル式業務 
1 京ビ株亊 >lv 
〇区橋 K ル S 
I 央京皈檐 B 
4中新一報 U 
〇都ザ 悄 P 
1京 
〒東 


1 mi 


〔3 1東京 S 港区三田3 ——20 — 
1-10】 一二田駅菌ビル 25 r 

雜 

〔8〕東京 ソフト開発株式会社 

m 開発部設計5課 

□ ©三田太郎様 


亍 104101 
柬京都- 5-^ 区京描31318 
新京撟ビル 3 F 
ブラザー販売株式会社 

情報機 II 事業部営業都 
PUB 事務局 


T'i. 


Ms 

















































漢字プリンターだから 

ープロソフトで、 
カンタン/ 

もラクラク/ 





官公庁提出書類、見積書、注文書な匕すでに 
書式が印刷されている定型文書にもキメ細かく 
カンタンに印字できます) ( キァホ-ド使用の場合） 


2月31日 


398000 
1009 X 
00 49,800 498000 

X 

100 49,800 498000 



•まず差込み印字データを頭ぞろえでインプット。© 
_キーボード(オプション)で、定型害式に沿って打 
たい位置を設定、登録しま1"。(写真 1) 
•キーボードの記憶容量は 487 力所。 99 分割が可能 
て； 1 ファイル最大 60 力所〇 ( ノぐンクアップ機能付） 
•同時に 3 枚複写までできます〇(ケミカルカーボン紙） 



用紙は A 4。 
•アンダーライ 
ンを引いた部 
分は、⑥印字 
(7) とき_彳晃さ 
れるため見出 
しとして#え 
ます。 

(対応できない 
ソフトもあります,） 


•印字時間の短縮化を実現。 


インテリジェント漢字プリンター 


割付名人 M-1024 



• 24ドットイン/ くクト漢字プリンター 
•高速漢字処理 （20 CPS —40 CPS ) 
•気くばりの低騒音設計(減音モード付) 
•しかも、小型•軽量•低価格 


•もちろん、はがき•定型書式印字以外でも高 


性能発揮 


この高機能で、この低価格/ 

M -1024 P ( mi 5 。。 対応) •…¥128,000 
M - 1024X(msx 対応） . ¥128,000 


フォーマットキーボード FK-20. ¥29,800 

ピンフイードユニット PF - 50 . ¥5,000 

JIS 第2水準漢字 ROM ボード . ¥20,000 

才一トカットシートフイーダ SF-20. I月発売予定 


静かな印字、 

熱転写プリンター 

•9 ドット熱転写ビットイメージプリ 
ンター。參サイズ•重量： 303(W)X 
65(H) XI 74(D) mm 約 1.6kg 



写真は、 HR-5X 


¥39,800 


FM シリーズ完全対応••… MSX • PG シリーズ完全対応 



PUBOK = r s 》 会！!募集中 

PUB は、ブラザープリンターご愛用者のための「ユーザー友の会」。プリン 
ターをサポートしたプログラムの募集•紹介•及びプリンターに関するハード- 
ソフト情報のコミュニケーションが主な活動内容です*入会者には PUB 会貝 
証を進呈します。詳しくは (03) 274-6911 へどうそ二 


PUB MEDIA 60 年秋号好評配布中 

PUB の会！!誌 PUB MEDIA の新しい号が発刊されます。 M - I 024 の詳しい 
紹介記事も載っています。ご希望の方は、上記の PUB MEDIA 編集部へお 
問い合わせください。 


ブラサ■"販売株式会社情報機器》業部 

東京/〒104東京都中央区京橋 3-3-8 0(03)274-6911 
名古星/〒460名古屋市中区大須 3-46- 15 ©(052)263-5811 
大阪/〒542大阪市南区心斉橋筋卜 I 0(06)25 卜7265 


|ブラザーブ V ンターの詳しい資料をご希 1= M -1024 P/X r 
I 望の方は、右の番号のいずれかに〇を 
I つけ、はがきにこの部分を貼ってお送りく 
J ださい。また、お手持ちのパソコン機種、 

' 使用用途(ゲーム、ビジネス…など)、住所、 

1 お名前、年令、 t 話番号もお杏きください。 


: HR -5/5 X 


: 資料 W 求券； 
oh! 

Hit Bit 
I月号 






















































































ャァ！僕、藤谷美和。大学生を3年間やっている 
ハタチのいい男です。ミワではなくヨシカズと申します。 
身長丨 77 cm 、 体重 84 kg 、 ちょっと太めだけど自分の体 
型には満足 UT います。頑丈な体を活かしてグルメ同 
好会の会長を してい ますが、本職はお星さまのお勉強 
をすることです^今話題のハレーすし、星の軌道計算な 
んかもやるんですよ!！すごいでしよ。 

ところで、グルメ同好会といっても、ただ食べ歩くだ 
けではありません。春はテニス、夏はサーフィン、秋はハ 
イキンク:冬はスキーと、スポーツをこよなく愛好してい 
ます。催し物の好きな連中が集っていますから、月丨回 
の会報のほかに、案内状など文字との付き会いもけっ 
こうなものなのです。 

そして、悪筆で名高い僕は、なんとこの会報作りの 
功績によって一じつは JET - X 1 のおかげなのです 
が一現在まで会長とじ T 君臨じ T いるのであります。 



春の会員総会、といってもメンバーが丨5人のグル 
メ同好会ですが、こんな提案がでました。 

「次期会長になる人は、我が会念願の会報を出すこ 
とにしましょう。どなたか立候補しませんか」 

そこで、会報を書くだけで会長になれるなら……と 
思った僕は、悪筆のことをすっかり忘れて手を挙げて 
しまったのでした。当時は僕の字体を知らない会員達 
は、体格に感心したのか、会報を書くという面倒を押 
しつけて、ほっとするためか、全員一致で僕を会長に 
承認じ r しまったのです。そじ c 会報第 I 号が発行され 
ました。 


Carry lab. 


藤谷美和君 .20 歳 


日本語ワーブロ JET シリース 

jEr-m/4 

•PC-8801/mkIl/SR/TR/FR/MR 
春 5 インチ (2D) 3 枚組 ¥35.800 




籲 PC-6601 SR/ 6001 mk II SR 
修 3.5 インチ (2 枚組) Y 29.0 on 

JET-SOm 

♦PC- 8001 mk II SR 
參 5 インチ (2D)3 枚組 Y29 ()()() 


★ FM- 7,77シリーズ， MZ.ZZtXVMOO シリースも.発売中 

(什梅が轉なリ ir ので w し <it. お w い含わせ下さい） 




お世辞にも美しいとは言えないと自分でも感じては 
います。それでも第3号までは何の苦情も出ずに済み、 
そじ r 臨時総会。 

「会報はもっと品位のあるものにじ C 下さい。せっかく 
の面白い情報も誤字、脱字、それに解読不可能な字 
が多くて読めません。」 

-会長は何とかせよ!!一と強いお言葉が矢のように 
飛び交います。その時、矢の一本が頭に当り、ひらめ 
くものがありました。（そうだ！ワープロがあるじゃないか。） 
「皆さん、次の会報に期待じ C 下さい。私は会長です。」 


計算機をワープロに 

僕は、本職がお星様の軌道計算なので、自宅にも 
XI turbo を置いています。でも、会報事件が起きるま 
ではパソコンには計算ばかりさせていました。根が凝 
性なのでワープロならなんでも良いという訳にはいき 
ません。パソコンショップを数店歩き回り、チェックボイ 
ントをメモに抜き出しました。 

• 入力から印刷までの操作は簡単か？ 

• 編集機能は充実 1/ T いるか？ 

• 漢字変換機能と辞書内容は強力か？ 

• 表現力は豊富か？ 

• メンテナンス等、サポート体制は 

しっかりしているか？ 

そじ r もう I つ、プリンタとの相性があります。ソフトに 
よってはプリンタが限定されてしまい、確認せずに購 
入したため、 コン トロー ルコー ドの違いからうまく動作し 
ないということも起こります。ワープロソフトの盲点でも 
ありますから、購入するまえに十分確認じ c おきましょう。 

JET - X 1は、なぜ選ばれたか 

僕の持っている Xl / Xlturbo 用のワープロとし 
て数種類のソフトのデモを見ました。その結果、僕は 
JET - X 1 に決めました。 



历がな 

ければダ/です。 JET - X 1 は10種類のアンダーライ 
ン、26種類の網かけ、そじ C 倍角、％角、半角、イタリッ 
ク体と文字の変化にも富ます。それに本職の方では、 
計算式を扱いますから、％角文字は大いに役立ちま 


列 ぃ一強ぃ味方は♦のもの 

埶を n ンワ■プロ 























で、グルメ同好会の会長に納まるの巻 



SHARP X トンリーズ/ XI turbo シリーズ 
■ 5インチ (2 D ) 3枚組,， 


㈱ キャリー•ラボ 


亍862熊本市大江6丁目 25-25 金子ビル 1 F 
TEL 096-363-0211 FAX 096-363-0235- G 2- G 3 


サボー ト センター（月〜 金曜日14:00 〜 17: 00) 
電話にて受付 096-363-0047 




(※お詫び） JET - X 1 の発売が遅れたことをお詫び申し上げます。 


17 7 麟 


•日本語処理 システム JET - CORE ™ 

「日本語ワーフロ JET -8801 Aj の日本語処理（かな漢字変換）部分を再搆成した「日本語処理システム JET - 
CORETMj を OEM 供給いたします I 羊細につきましては、甯面またはファックスにて当社企画部 CORE (コア）係 
まてご itt 各ください，支）一ねのお客«には市明いたしませんのでこ了承くたさい 


文霱サイス：*大64文字 X96H、 一校の文翥ディスク C64 

交«5で紀® 

ffi 面表示： 40文字 X9 行(XI turbo 200ライン • XIシリ 
ーズ)。40文字 Xl6^(XUurDo400 ラインの 
み)。4〇文字 X21 行(XI turoo 400ラィンのみ） 
文字*球：金角 (JIS« —水す看字2965文字、开廣字403 
文字)。システム外字(金角、妇体字、紀 S など 
321文字)。3—サー外字(全角 .3 — V—定典 
◎艷192文字ん去角文字(菜 • 5? • 紀多らど 
96文字)。14角文字 (W •かっこ紀号など上つ 
さ下つ CS16 文字)。 

上紀の®角.较识角、4疤角 (《« 角、4«角は 
ブリン57印字のみ)。 JIS 第二水顰は；#字::一 
ド表示(フ U ンタぐより第二水颦印字句)。 
(注) W 码角、4浥角はブリンタによつては印字 
で6ないものがあ05す 

文字入力：入力 • □一 7字入力、コート•入力 CJIS 
第二水顰乂文字 e 号入力(紀述紀号，钴郊紀 
另、字術紀号、银 G 紀与、一般紀号85追紀 
S、 輅字紀罟、ギリシャ文字、外字文字から 
»枳 .. 灞字コード） 

文®変*: JET-CORE …に截、文法解析！：:よる《« 

«蟎*枳，接尾«沱文®5換、龜 ； S 
換、两 s 換.： isr? 変換。货塞字 s 錢啶あ〇 


縝 集：レイ万つ卜》蚝、作《, : P ンターラィン （10 

碭油〉曲かけ(？5礓?6)、文字そろえ、フ a ッフ 
襯写、9フ扮足、むンタワンフ， e よせ、左 
よせ、文字巩»換.艾臁薄み: tWDO のみ)。 

Iラの砵入.かの泽入.印除、けの複荽 
文字の切 0ft50(40 文字5で） 

辞 S :的3巧5千 tt そ准鷉:一妨.人名、地 S を含 

r パ•辞腐ず©鞭吸！《〇」ープーによる辟塞鼓 
u - mm., 的4巧嶸 

定型句：狄みを含み64文字 X 96 句狭み，莩 
Cf はフフンクシ3ンネーで*択 
印 刷：巧鐮フり'ノタに対 f ん哂膚 eeo 耽、行 

两V，，故定、をV - ジン松; f. 

部分印轨、灞跃 tc 剧など 
(DW 供角. 4阴角の LDTIC ついて 
• 

籲24ドット凟字フリンタはフワン*9本 
.:(8印字*鼈があ n ば g 鲠 (C2-8 
PN1. MZ-1P17. PC-PR201H/T など） 
禰助«貶ン ス亍し m.， 拇薩 文*コビ-•、金文應印晚 
权窗«»、外字©球、文莩列榷索、文 》s 換 
(文塞 BASIC フ: p ィル） 


す。外字パターンを組み合わせればグルメ同好会の 
ロゴでも作れるから楽しくなってしまいます。 

そじ T 最大のメリット、それは、わからないことが起 
きたとき、気軽に相談できるサボートセンターがあり、 
メンテナンスもノ <ッチリの体制がととのっていることです。 

これだけのパフオーマンスのあるソフトを35,800円 
で買えるのは、僕のような学生には嬉しい話しです。 

JET - X 1 おおいに活躍！ 

僕のお気に入りの JET - X 1 は、操作が画面イン 
フオメーシヨンに従うだけで良いので、使い始めてすぐ 
に全機能を引き出せます。公約通りに上出来の会報 
を出すことができ、会長とし T の腕前も磨きがかかっ 
てきました。どうです、グルメ同好会の品位が表現され 
ているでしょう。 


日本語ワープロ JET シリーズ 

販売実績 30,000本邃成ガ 


JET - X 1 

価格 ¥35,800 


次回は、僕の本職(学業）である論文作成に 、 JET 
が役に立った話しをしましょう。 














GAME STORY 


緊急指令//家族救出大作戦 

★★★★ 地球編 ★★★★ 

卞宙人魔人に家族をさらわれたドロール界。 
救出作戦開始です。でも宇宙に旅立つために 
は览人なお金が必要。闲ったドロール君は 
資金作りのアルバ仆を始めます。失敗を繰 
り返したり、宇宙大魔人にねらわれたり、思 
わぬ幸運にであったり。そしてついに出発準 
備.;6 r 。興衔に包まれながら宇宙大魔人の 
惑兄.に向けて、さあ、スタート。 


宇宙•救出編 


人宇宙に広がるスペースファンタジー 
宇宙に無事飛び出したドロール#、いろ 
いろな人に助けられながら着々と戦闘準備 
を整えます。でも広い宇宙は危険もいっぱ 
い。悪徳商人、宇宙海賊、魔のブラックホ 
—ルと. C !、 もつかせぬピンチの連続です。ワ 
—プチャンスで令に宇宙大魔人の惑星へ 
突幣。この最後の決戦がドロールゲームだ。 
救出なるか？! 


勝れはム i •後までわからない•マネーウォーズ 
JOYJOYPACK SPECIAL のもうひとつの 

さは、ドロール君の マネ ーゲー ム 。ドロ ー 
ル冇の貯金箱にはたったの$1000、でも宇•山 • 
船は$10000。アルバイト選びも楽じやない、 
ウエイターに道路工事に新閗配達、うれしい 
給料1:1に空くじの夢。宇宙へ旅だっても武器 
を n ったり宇宙船が故障したり。無事に家族 
を救出すれば、なんと$150000のボーナス。 
持ち金がモノをいって、ゲーム終了と同時 
アツと驚く大逆転！ 


SPECIAL 。 噂のコンピュータゲーム「ドロール」とオリジナルのボードゲームがドッキングした。ちょっぴり 
ロマンチックなスペースウォーズはピンチありチャンスありの超大規模な構想。そのスペクタクルを秘中の作戦 
で切り拓くのは君か、それとも…。狙いが当たれば一発逆転。みんなが集まってワイワイ盛り上がって楽⑼るそ： 



-クス只為—- 

DROL ㈣ ' C ：' BRODERBUND SOFTWARE 

特殊スーツに身を包んだ ドロール 君が、4階建ての地下 
牢を舞台にくりひろげるスリル満点のアクションゲーム 
•グ1面は妹とトカゲ、次に弟とワ ニ、 最後にお母さんを 
助け出せば1セット終わり。感動的なデモが君を暖かく 
包んでくれるよ。サソリやエイリアン、へび、おまけに 
オノやナイフや鬼までも…。画面が進むごとに ユニーク 
なキャラクターが登場し、楽しさとスリルがいっぱい.グ 
ドロール 君はみんなを助けることができ るかな一? 

SHOOTING WARS 

JOY JOY PACK SPECIA し用 l こ新登 i *. グ 
君は、宇宙のスーパーヒーロー、敵の攻擊をかわしなが 
ら敵を犁つスリル満点のシューティングゲーム。また、 
ボードゲームとドッキングさせ違った魅力もいっぱい.グ 
力ードに（ゲームポード中）害いてあるアルファベットを 
簡単に入力するだけで、宇宙船の攻犁、防御、スピード 
などいろいろ変わってたのしさ2倍、3倍…。さあ/君 
_ も宇宙パトルへ出発だ.グ _ 

•写真は実際の画面と多少異なる場合もあります 

iiiz ■ 腿 ®® 画 1q oori 

標準価格 u 9 ouu 円 

当社では、 Super MZ 用のソフトウェアの開発、流通を展開じ T 
います。今年11月より専門のアプリケーション•こュース誌 「トラン」 
を創刊し、製品の紹介とあわせて Super MZ ユーザーのあらゆる 
面でのサポートを行なってまいります。お問い合せは下記住所迄。 

エス • ビー•シーソフトウェア株式会社 

〒160縣腦? 1 E 本剧1細體ビル TEL . D ：3 L 9241( 大代） 


到#./ 


务し、今。、ダ 

免％- 














































33 本の応用実例集付 

♦電子マニュアル付 
籲電子コマンド辞書付 

(XI ターボのみ） 


カルク、スプレッドシート、リレーシヨナルデータ 
ベースのすベてカヾここに次)る。 

シャープ8ビットマシンソフトのベストセラー、 
超高速 マシン 語「ビジ レス」。 

33本のサンフ。ノレ例を搭載じ€好評発売中。 




ホビー、 ファミリ-、ビジネス •••これ 1本でパーフエクト。 


「ビジネスは変更の連続」とソクラテスは定義した。 

そんな ニーズに ぴったりの マルチ タスク ワーカーが 
ビジレスだ。 

「1本のソフトで全て処理。 

こんなソフトカ ? あったらいし、な。」 

プログラムによってディスクの入れ替えはもういやだ。 
住所録をせっかく作成したの ( こ DM を発行しようと思った 
らそのソフトに機能がないため再度 DM 用ソフトに入力し 
なおしなんて……顧客管理をしよう LS 、 ってもそのソフトで 
は機能が不足するために、また別のソフトを購入してしま 

う。また始めから入力をする . すると社長からせっかく 

コンピュータがあるのだから顧客の売上や仕入れを追 
加して ABC 分析をするように命令される。やっと入力が 
終了してほっとしていると、また社長から追加の言葉…… 
今度はセールスマン別に分析しろとのこと……さらに担当 
セールスマン売上と顧客の仕入れを比較するべきとのこ 
と……給与計算と顧客管理を連結せよなどとは社長も思 
いつくことはな L 、だろうと思っていたら……恐れてし、た事態 
が発生した。やはりセールスマン管理で売上別分析が 
できたのだから、そのデータを利用 U ： 給与計算のなか 

( :売上歩合も追加するとのこと……もう我慢できな l . 

そんなことは不可能だ……助けてくれ……僕はプログラ 
マーではない。 

皆さんもそんな経験はありませんか？ 

ビジレスはそのようなニーズから誕生しました。 


パーソナルビジレス版 定価28,000円 


ビジレスの特徴 


#80のコマンドもカンタン操作で、自由な表づくり 

よこ130文字26項目以内、たて999行以内で使用。ケタ 
数と数値データ#か文字列$かの指定をおこなうだけで 
表のわくがつくれます。（カセット、 QD 版タテ 256) 
•必要なデータを項目別にすばやく探す検索機能 
検索スピードは、 25( M 固のデータから 0.5 秒。記憶されて 
いる 膨大なデータの中から条件にあてはまるデータを高 
速検索。データの分類も簡単。 

•列単位セル間でウルトラ演算 

表の列冽、定数の列の間で、加減乗除、％計算、構成比率、 

残高、累計、平均、最大、最小、標準偏差の計算力 5 'できます。 

•情報ごとの集計が可能で、仕訳もラクラク 

タテの合計、ヨコの合計、同じ項目名による集計は簡単 

です。またディスクにある別々のファイルの集計ももちろん 

可能です。 


_よく使用する手順は自動プログラム 

定期的な仕事を設定すれば、専用プログラム。ファイル 
ごとにちがう手順も設定できます。 

マルチファイル15,000文字以上（カセット82文字） 

#シャープユーザー 辞書でダブル データベースになる 

例： ユーザ— 辞書に郵便番号、 コー ド等を登録、 スピー デ 
ィーに住所、名前を呼び出しビジレスに入力できる。 
•1 力所変更ですベて変更できるデータ•リンク 
一つの変更リストをもとに関連するファイル更新ができます。 
•各種伝票のプリント•ァウト。宛名印刷も可能 
各種伝票や集計表、見積書はき m 、なフォームでプリン 
卜•アウト。画面上で帳簿を設計することができ、宛名の 
印刷もこなします。 

•データの並び替え可能 

250個のデータを36秒でソート。データを大きい順、小 
さい順、あいうえお順に並び替えます。順位づけやデータ 
の整理にたいへん有効。 


リレーショナル•データベースとしてのビジレス利用の実際例 

— _ 霣 60 年 1A 15B 




B-100 

H-200 

H-300 

H-500 

B-700 


プ D ジエクシヨン 
>的 集 I 十 


セレクション 
>B 分類 




***»■ 


縟童免名 

隽上裹 

比牵 


早川痛寧 

(鋒）パ，シ 

山本_会 
裹木痛 JS 

16.000 

16,000 

7.500 

22.2氅 
22. 2戆 

11.2% 

0000000 

♦ 9t 

67.500 

100.0« 



サンブル版でお試しください/ 


現金書留に3.000円を同封の上、住所•氏名ィ江•商品名•ご使用機種名をご記入の 
上、 OA テック宛お申し込みください。 


■対応榱種 

XI / F / ターボ/ターボ I 、 MZ - 2500 /2200/2000/80 B 
5 KX 1 F は FD 1 台で使用可能。 

■対応プリンタ 

PC - PR 201/ PC -8822/ NM -9400/ UP -130 K / CZ -8 PN 1/ CZ -8 PD 2/ C 2-80 PK / CZ -800 P / 

MZ -1 P 07/ MZ -1 P 10/ MZ -1 P 11 

■価格 

• TAPEK 5¥ 10,000 *5 インチ、3インチ版（カナ）¥ 39.000• 5インチターポ澳字版¥48,000 

• MZ - 2200 QD 版 ¥ 12,000 • 3.5 インチ MZ - 250031 字版 ¥ 48.000 (予価） 



OA テック推薦強力'' Let ’ s シリーズ" 

■下記ソフトを起動するのに「ビジレス」は不要です,：■データは全て「ビジレス j で使用 
できます。 ■ Lefs シリーズのデータはお互いにコンパチです 3 

•家計簿 (¥6.800) •住所 S*/DM ( ¥ 15.000) •データベースワーブロ （ ¥ 18,000) 
•レコード • ビデオ管理< ¥15,00 0) •名剌管理< ¥6.800) •ファミリーパック < 1〇本人) 
(¥30,000) •カロリー計谅 （ ¥6,80⑴•献ケサーチャー （¥6.800) •テスト成績処理 
( ¥ 7.200) 參也徒台帳 （ ¥ 6.800) •成桢妃鉍薄 (¥6.800) •袼） i 謝管理 （ ¥ 6.800) 
•売上管理 .（ ¥ 18.000) •什人管理< ¥ 18,000) •壳上/仕入谇理 （¥32,000) •マル 
チ衣集計 （¥ 15,000>籲〇: W 理 （¥ 28,00 0) 鲁 DTftiT •理 （¥ 15.00 0) 籲兒褚杏発行 
(¥15,000) 籲納品/靖求丹発行 （ ¥18,000> 籲レンタル物件讶理< ¥24.000) •金種 
計算< ¥ 6,800) •アマチュア無線屯 f - ログ （ ¥ 6.800) •ビジレス学習用ソフト ( ¥ 3,000) 
•営業マン成綃讶理<¥6,800) •セールスマン顧容讶理（¥7.200) ♦会 H 管理 
< ¥ 6.800) 籲パーソナルパック （ 10本人 ）（ ¥ 30.000) 秦ソフ增理薄 （ ¥ 6.800) 參簡易 
給与計» ( ¥15.000> 參 T - 形谇坪 (¥6.800) 

★32.000 語熟語変換可（人名、地名)。シャープのユーザー辞害が使えます。 


Personal computer Proaraming specialist 


雲 f ㈱ O A テック 


本社•亍 444 愛知県岡崎市上六名 3-13-2 S (0564)53-9400 

• ビジレス開発元：システムデザイナー MASH 豊田市若宮町 5-470(0565)31-7644 
■ 敁寄りの ショップで 瞄人 できな t 、場合はお屯 坫でお 申し込みく ださい。 ■ 岡崎信用 
金庫六名支店嫩此〇42283 .0 A テック■ソフトカタログをご希塑される場合は、住所. 
氏名，年•齡•ご使叫機秘 X をご明記の上、资料坫求券を N 封してご硝求く ださい。 
■詳い、カタログをご希ザの方は「解体新!！ L をお求めく ださい。 （1.500 円分の切手を 
同封の上、 OA テックまでご送付く ださい。） 


資料請求券 
oh ! MZ 1 月号 
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〈フ U ツキー〉 


，力木ツカ 

とれすこし 

フ U ツキーは青い鳥。のら猫ニヤンニヤンの手からひよこ耷 


守れ/アクションバズルゲーム/ 

全48面以上、 FM 音原、 PCG 、 コンストラクション穿 
ぞれの機種の個性を生かし、才 1 J ジナルをこえだ/ 







呀每口骑 魯—⑩麵屬 珍 





•造逼儒®対応 

p ピオ V プロレスス^^ル s フリツキ- 

t\j セット版 FD ¥ロツビー版ム版 * X 1 -D は f 


X1-D は使用不可 


PC -8001 mkll/SR 

CT 

¥4,800 

PC - 8801 / mkll/SR 

CT 

¥4.800 

FD 

¥6,800 

MZ -2000/2200/2500 

CT 

¥4,800 

SHARPX 1 /turbo 

浓 CT 

¥4,800 

※ FD 

¥6,800 

f-K 4 *7 /Mr ： \A/*7 

CT 

¥4,800 

卜 M -7 /N ヒ W 7 

FD 

¥6,800 

MSX (フリッキーのみ） 

RC 

¥4,400 





いに登場チャンピオン•プ□レススペシャル/ 


5 ノ人の中から レスラーを えらび必殺ワザをきめろ/ 

>才〜、アツクスボンバー/コノヤ□、エンズイ切り// 


ハつきに場外乱闘も〇 K / CHAMPION 


© 


※溫騮愆叙。ライゼ スネ 土の許諾 


マイクロネット 赢 

l_romt 


〒〇64札幌市中央区南10条西15丁目ムラカミビル 3 F 001 1-561-1370 
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RANDOM HOUSE 


ソフトウエア開発 

株式会社ランダムハウス 

埼玉県坂戸市末広町 3 - II 
(営業所） TEL 0298-42- I 307 


主題性/集大成/したいぜ/ 


好評発売中.グ 

FRPG -リグラス 


5 インチ I 2 D 定価6,800円 


カセツト発売予定 


今までの ゲームに ない、 ヒュー マ 
ニズムにあふれたシナリオコンセ 
プト。息をもつかせぬ、冒険また. 
冒険の連続。あの俊才森田和郎率 
いる超絶プログラマー軍団 f ■ラン 
ダムハウス J の自信作。いまべ一 
ルを脱ぐ、壮大無比、心臓乱舞の 
ファンタジーロマン。 

森田和郎総監督， 

シナリオ山口祐平 




















































炎， 


• X-1/turbo/F (CT) ¥4,200 (5D) ¥6,200 

※ DISK 版はマップコントラクション付。 

※父-彳〇をご使用の方には当社で3インチ版のサ 
ポートをいたします。当社までご連絡下さい。 




★当社製品内にあるアンケートハガキにお答えの上、「カレンダーおくれ j と明記じ C お送りいただ 
いた方の中から抽選で2000名様にポーステックオリジナルカレンダー C 86 年版）をプレゼント.グ 



,_ v ® ボーステック株式会社 

「メハ丁 t—!■ [ r 亍 150 渋谷区神宮前 5-42-1 

I I I I CZ し TEL(03)407-4191 


★当社製品の開発スタッフを求めています。（自宅開発可） 


•通信販売も行なっております。ご注文の際は、品 
名•槐種名•住所•氏名 • 诹話番号を明記の上、必 
ず現金書留でお申込下さい。（送料無料)尚、お 
急ぎの方は、速達代金300円追加して下さい„ 























スーハーリアリズムロールフレイング 

★母船からのメッセージで展開する 

新感覚ロールプレイングアドべンチャー ★ 

■本格的 SF ストーリーで展開するスーパーリアリズムロ 
ールプレイングゲーム。 

■高速8方向 スクロールでスムーズなゲーム展開。 

■地上戦、空中戦、海戦と広大なマップに潜む無限の敵 
キャラクタ。 

■上•下•屈伸、ジャンプ等、24パターンの動きをする 
リアルなキャラクタ。 

■状況によって、画面下にメッセージが流れる新手法を 
採用0アドベンチャー的ムードもタップリ〇 

■ビームガン、ジェットパック等の強力兵器を装備してい 
く、キャラクタ。リアリティ抜群の成長度に興奮まちが 
いなし。 

■デュラン • デュランの「 ユニオン • オブ•ザ • スネーク」を 
揷入〇名曲と共にスリリングなゲームを楽しもう/ 


ゴル^フゲーム 

最高峰 


シャープ XI シリーズ 

5インチディスク版（ターボ可） 
¥5,800 

テープ版 （2 本組)…¥4,800 

君は エニックス オープンの 
覇者となれるか!？ 

作者村守将志 


m] Q ^ 

RkS S3S 


12月中旬 

新発売 


シャープ XI シリーズ 

5インチテ'イスク版（ターボ可）…¥5,600 
テープ版 . ¥3,800 


も謹 


ワ■ルド: J ルフ龜 

エニックスオ-プント-ナメント ゴルフ^ 


1 






作者石川博 


鼷并沢誘拐案内 


ロマンチック 

ミステリー 

ァドべンチャー 

〖一トピア連続殺人事件の作者•掘井雄二が放つ 

ロマンチックミステリーツアー/ 


★リアリズムを追求した本格的機能 ★ 

鲁トッブブロ30人との卜ーナメント方式を採用。各ブロの成績が、1ホールごとに表示さ 
れ、キミの順位はすぐにわかる。18ホール終了後ベス M 0 以内に入れば、コースの会 
員として認められ、エキストラホール （9 ホール）の使用許可がおりる。 

_ゴルフコースの微妙なアンジュレーション(凸凹）を完全シミュレート。 

•ボールの弾道も U アルそのもの。トッフスビン、バックスピン、スライス、フック等、 
自由自在。 

_美しいクラフィックで描<世界の著名ゴルフコース。 

■〔3.5インチディスク版〕 FM77AV、FM-77. ¥5.800 

■〔5インチディスク版〕 PC-8801mkIISR、PC-8801mkII、PC-8801 Y 5.800 

■ 〔テープ版 （2 本 組）〕 FM-7 シリーズ、 PC- 8801 mkIISR、PC-8801 mkII 、 PC-8801 …… ¥4,800 

一！ ■ンパストリ■卜 君をプレイイにする ★ 

人工知能型シミュレーションゲーム シャープ xi シ II ーズ 

■ 5 インチディスク版（夕-ポ可)¥6,400 

テープ版 (2 本組) . ¥4,800 

作者関 野 ひかる 
■〔5インチディスク版〕 PC-9801/E/F/M/VM/VF 

1 _ __ _ •. 也 -- 曲南*、 2D 、 2DD …¥6,400 2HD Y 7,400 

く人工^口能 - 近ついた女の子の 豊富な ■ 〔5インチディスク版〕 PC-8801/mk II/SR、 

★ナン/<(7) ノウハウを完全シミュレート ★ ■〔テープ版 （2 本組）〕PC-8801/mkII/SR、FM- 

★特定の女の子とデー 卜できるデートモード付 ★ 7全シリーズ V4. 800 


ひたすら娯楽に徹した 

ミステリー大作 
君は軽井沢に^を見たかつ!？ 

■〔5インチディスク版〕 FM -7、 FM - NEW 7、 
PC -8801 mkIISR 、 PC -8801 mkII 、 PC -8801 … 

. ¥5,800 

■〔テープ版 (2 本組)〕 FM -7 全シリーズ、 PC - 
8801 mkU SR 、 PC - 8801 mk II 、 PC - 8801 Y 4.800 


シャープ X 1 シリーズ 

5インチディスク版（ターボ可） 

¥5,800 

テープ版 (2 本組)…¥4,800 

★膨大なセりフデータをもち、つぎつぎか | 
わってゆく登場人物たちのリアクション/ 
★画面数約100枚+スクロールマツブ3エリ | 
ア/ 

★楽ちんなワンキー入力で、とちか<、め | 
ちゃめちゃ楽しい娯楽大作なのだ/ 
★読みやすい、ひらがな•カタカナ混合文 。 L 
★主人公の名前はキミ。おもわすてれてし | 
まろポクなのだ。 

★なぎさのオマケ写真もついて全障。 

あ/ 3 、Q 


「 — 


通信販売の 
御案内 


御注文は現金書留にて、商品名、機種名、住所、氏名、 
電話番号を明記の上、お申し込み下さい（送料無料） 
〒160東京都新宿区西新宿 7-1-8 

㈱ エニックス「通信販売」係 


販売元 株式会社パ V 西六ェニッ〇ス 

発行元 （ 株式会社 エニ ツ クス 

〒160 東京都新宿区西新宿7丁目丨番8号 TEL 03-366-4345 














































ファイル 




•まつだ < 新しい思考ルーチンの開発により、強さ- 
スピード共に大幅アップ。（プロクラムはアセンブリ言語) 
•自由に定跡を登録できる。 （ FD ) 

•マイコンが人間の指す手を覚えてあなだに合つだ 
思考ルーチンに成長していきます。 （ FD ) 






★ PC 880 I のユーザーで、棋太平が作動しない方へ 

PC — 8801 (旧タイプ）をご使用の方で、稀に動作しないという方がいらっしゃいますが、作動し 

なぃ方は' デイップスイッチを N ベーシックモードにして立ち上げて みて下さぃ 3 

また、純正以外のディスクドライプをご使用の方も、同様にして立ち上げてみてください 


@0ァの 1 
迷路が劫 
i 々ヒ变っ 
I て、君を 
I 笫 U ) る.’ 


〒960鸛市太平獅納 5-3^(0245)45-5777 
FAX (0245)45-1804 ( GII . GIII ) 
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011 

X -1 /turbo 

シリーズ 

3 FD 

¥5,800 

CZ -8 〇〇は、要 G-RAM 
カラーモニタ使用 
フロッピーディスクドライフ 
並びにデータレコーダは、 

純正品のみ動作確認済み 
ジョイスティック対応 

GS 

012 

X -1 /turbo 

シリーズ 

5 FD 

¥5,800 

GS 

013 

X -1 /turbo 

シリーズ 

CT 

¥3,800 

GS 

014 

MZ -2200/2000 

シリーズ 

5 FD 

¥5,800 

カラーモニタ使用 
フロッピーティスクドライフ 
並びにデータレ]-ダは、 

純正品のみ動作確認済み 

GS 

015 

MZ -2200/2000 
シリーズ 

¥3,800 

GS 

017 

PC -8801/ mk 2 /SR 

シリーズ 

5 FD 

¥5,800 

カラーモニタ使用 
フ□ッビーティスクドライフ 
は、純正品のみ動作確認済み 

< 

る 

へ 

GS 

031 

X-1/turbo シリーズ 
MZ-22DG/200G シリ-ズ 
PO8801/mk2/SR シリ-ズ 

5 FD 

¥5,800 

CZ-eOO は、 ®G-RAM 

MZ 2000は、 SG-RAM1.2.3 

；〇ラーモニタ使用フ□ッビーディスク 

ドライフは、純正品のみ動作確防済み 

X-1 シリースは、ジョイスティック対応 

GS 

032 

X-l/turbo シリーズ 
MZ- 2200/2000 シリ-ズ 

¥3^800 

CZ- 800は、 SO-RAM 

MZ- 2000は、 SO-RAM1.2.3 
カラー モニター使用データレコーダは 
純正品のみ動作確®8済み X-1 シリース 
は、ジョイスティック対応 

GS 

036 

PC -8801/ mk 2 /SR 

シリーズ 

CT 

¥3,800 

カラーモニタ並びにデータ 
レコーダは、純正品のみ動作 
確認済み 

GS 

037 

X -1 /turbo 

シリーズ 

3 FD 

¥5,800 

カラーモニタ使用 
フロッピーディスクドライフ 
は、純正品のみ動作確認済 
ジョイスティック対応 

% 

GS 

051 

X -1 /turbo 
シリーズ 

5 FD 

¥6,500 

CZ - 800 は、 要 G-RAM 
カラーモニタ使用 
フ□ッビーティスクドライフ 
並びにデータレコーダは、 

純正品のみ動作確認済み 
ジョイスティック対応 
純正フウス対応 

<：«だし、 X- 1 D のテ—フ版使用は、でき*せん） 

GS 

052 

X -1 /turbo 
シリーズ 

CT 

¥4,500 

GS 

053 

MZ -2200/2000 

シリーズ 

5 FD 

¥8,500 

MZ -2 〇〇〇は、要 G-RAM 
1.2.3 ヴ ン モニタ使用可 
フロッピーディスクドライフ 
並びにデータレコーダーは、 
純正品のみ動作確認済み 

太 

孕 

GS 

054 

MZ -2200/2000 

シリーズ 

CT 

¥4,500 

GS 

055 

PC -8801/ mk 2 /SR 
シリーズ 

5 FD 

¥6,500 

カラーモニタ使用 
フ□ッピーディスクドライフ 
並びにデータレコーダは、 

純正品のみ動作確認済み 
アスキーフウス対応 

GS 

056 

PC -8801/ mk 2 /SR 
シリーズ 

CT 

¥4,500 

GS 

057 

MZ -2500 

3.5 FD 

¥7,000 

カラーモニタ使用 
ジョイスティック対応 
純正フウス対応 





















































































西暦2500年。宇宙のはるかかなたから、ギラン星人がやっ 
てきた。彼らは地球を守る合体ロボ•ザイオンを奪うと、宇 
宙空間の基地へ運んでしまった。地球が危ない。敵基地 
へ乗りこんで、ザイオンを取り戻せ/キミのキーテクニック 
で、地球を救うのだ。 

•ザイオンを救出して合体せよ/どんどん強くなっていくそし 
參全8面がそれぞれ違ったゲーム仕立て。 I つのソフトで8倍楽 
しめる。 

•合体が完了すると、超大型ロボ•サターンとの一騎打ちだ.グ 




-かぐや姫 




ガッコー やオフ イス じ や、ぜったい 教えてくれないけ ど、コレッて 
とっても役に立つのよね。「新竹取物語」のスタートの場面で、 
この2つをもらえるから、あなたの知識と経験で、うまく使いこなし 
てみて。実は私、知ってるんで 1；コレの スゴイ使い方。ホント 
一は教えてあげたいんだけど……、私の口からは言えない っ。 
だってとっても恥ずかしいことなんですもの、アドベンチヤーの 
ヒントを人に教えるなんて。あなたの健全な心で想像してね。そ 
して高得点で私を捜し出してよね。かぐや姫からのお願いよ0。 


•もう、キミはかぐや姫に出逢ったか!？ 


新竹義語 


XI ユーザーの皆根、ながらくお待たせしました。 

•絶賛発光中 

X 1/ X 1 turbo 5イ 々 FD 

※すべてディスク版のみ ¥9,800( 2枚組） 

FM シリーズ、 PC シリーズも好評発売中 


(かぐや姫の親切アドバイス） 

•未亡人のセイコさんも逢いたがってるわ。 
•ポイント制で、ゲームの出来を競えるの。 

春100点以上で私と逢えたら、段位をさしあげます。 
(直接問い合わせてね） 

•よ一く考えないと、ゲイバーに売られちゃうんだから。 
•醜女姫と出逢っても、くじけないでもう一度ガン 


■通 II. 

13 通販 

商品名•使用機種名記入の上、代金と送料 (500 円） 

を現金書留にて、下記まで直接お申し込みください。 

〒107東京都港区北青山 3-6- 18(共同ビル靑山 2F) 

日本エイ•ブイ • シー株式会社 Oh / M Z 係 

回 募集 

販売店を募集しています。 

お問い合わせは、日本エイ•ブイ.シー株式会社企画部まで，: 003(486)4121 
★健康で明るく、集中力のあるプログラマー、企画力のあるプロデューサー募集/ 
ビクター音楽産業株式会社 PS 制作部まで。 S03 (486) 9470 


•販売 ac 日本エイ•フ Y •ラー 株式会社 

• 

発売 ビ03■音楽産業符式会社 

※諸般の事情により、発売が遅れることがございます。申し訳ありませんが、ご了承ください。 




















HUDSON GROUP 

^-HODSOM SOFT 

本社•ハドソン札幌 / 〒〇 62 札幌市豊平区平岸3条5丁目 1-18 
ハドソンビル PHONE ： 01 1-841-4622 
営業所•東北•金 沢•東京 •名古屋 •大阪•岡山•広 島•福 岡 •鹿 児 島•沖縄 
アメリカ•イギリス•西ドイツ 
ハドソンの商品は、全国有名デ ハー トおよひハソコンシヨッフてお求めくたさい 


担当刑事の報告書、 

現場写真数枚、 

•証拠物件数苗、 

i —掛り—件を P 。 
名探偵殿 


依頼人八ドソン 


^^0 

獅 V ■む V 者かにか 

さて ■ f て驅1 I て 

てぁる。 そして、 与ぇら 


評IぃI'ム 

を推理せょ。 
























デゼニワールド 


もっともっと面白いものを作ろうということで'、発売予定が大幅に遅れていた『デゼニ 
ワールド』がついに完成した。（本当に、お侍たせしてごめんなさい。）しかし、さ 
すがに長い月日をかけたかいがあり、「これこそ、まさしくアドベンチャー•ゲーム 
と呼ぶにふさわしい。」と天才竹•中コンビも自画自賛するほど素晴しい出来ばえ 
となった。しかも、嬉しいことにデ'イスク版には、テーマソングなどが入ったサウンド 
トラックカセットも付いている。スリル/冒険/笑い/ショッキングな旋風を巻き 
起こす『デゼニワールド』は、全国の家庭で近日公開。 


_ 腦腿 III 


適応機種 ^X- 1 #X-1C •X-lturbo •X-IF 〔5"FD 版 ¥6,800〕 

※画面の 写真は全て X-l 用で撮影した ものです。 


本社•ハドソン札幌 / 〒〇62礼幌市豊 平 区平 岸 3条5 丁目卜 18 


ハドソンビル PHONE: 01卜84卜4622 
営業所•東北•金沢•東京•名古屋•太阪•岡山•広島•福岡•鹿児島•冲縄 
アメリカ•イギリス•西ドイツ 


ハドソンの商品は、全国有名テハートおよびハソコンシヨッフてお求めくたさい 




















































Licensed from 


Broderbund Softiuare 


iB 激に遊ぼう .’ 

アメリカは熱しヽゲー厶リングだ。 


ッブ〇 • 


4 て しランナ 


-トランナ - 


CHAMPION ICXX mj^4R COTKATl 

- - x AiX i 

••一^ー ルーーー—_一 

MWGltllinilHm 






フ 4 命ノ,-一一ふ、’卜へリ“チョー 

治|:梅，ぶ t; _ 


モシ。ゲ - 


砂％鱗 

> ぬ S •'で争二 

的^^の 

鱗 


コト ZbD 株式会社 

卜71□インタ-ナショナル事業部アポロテクニカ事業部 


〒530大阪市北区西天満 6-7-2 梅新東ビル5 F T E し06 (363) 1221 









好評発売中 



• X1/C/D/F/turbo シリ - ズ • 


• X1/C/D/turbo シリーズ • 


幻テクニカルマスタ- 


有田隆也/牛島昌和 / Itti Rittapom 共著 


ストラツトフオード C . C . C . 著 



B5 判. 300ページ 

定価2,500円(亍 300 円） 


本書では，入門レベルから はじめて ，XI 
の中でどういうことが起 ^ ている力 >が收観 
的に分ってもらえる よ'^ に構成されていま 
す 〇 XI turbo の ハー^! ゥエアの解析および 
W 辺機器について 譜醒ています。 


ユーザーの熱 l 、期待に応えて贈る mz - 
700ハイテク活用術決定版。 BASIC のハイ 
テク利叶 r 術をはじめとして，ハードウエア 


シャープ | シリーズの多彩な機能をフル 
に引き出すため 9解説 W 。 初めてコンピュ 
ータにふれるとい ^ 方から，ある手呈度 BAS 
IC を知っている方ま を対象に， X 1シリー 
ズ入門から，簡単な'^ ン器までを义例を 
あげながら，確実に きるように構成 
されています。 


B5 判 • 288ページ 

定価2,500円(亍300円）_ 

'参 ^/C/D/F/turbo 


有田》也 

牛鷗 B 和 

Itti Rittaporn 


仆"十へ i …パ！.：… 


XI テクニカルマスタ_ 


ソフトウェア両面から mz -700 パワーアツ 
プなど， mz -700 の機能を最大限発揮させ， 
上位機種をもしのぐ実力を遺憾なく引き出 
します。ビギナーからベテランまで，この 
1冊で mz -700 は 完全 理解 0 


/ 発行•問い合わせ先 X 

日本ソフトバンク出版部 

亍102東京都千代田区四番町 2-1 

003(261)4095 



























os 情報もギッ J 

• いつもまること完全保存版 
•的 情報ギュ-ッ詰め 神 ㈣ 8ヴ 


♦♦♦□ h !16 1月号の内容 ♦♦令 

■鶴 1/ フルゴリ私入 f 

•アルゴリズム私論 
鲁キー による サーチ 
• B - t 「 ee の基本艦 
籲扮木構造の_ 

•情報検索の基本技法•八ッシングとは 
■特集 II/H 部 X '!!, - 

•漢字 286 XENIX システム V と MS-DOS 
•バソコンから見だ XENIX の実像 
_臟 

•実習 C ブ□グラミング 
❿ FORTRAN による2次元 CAD システムの 製作 

■お* TT め MENU 

籲便利な FD スクリーンエディタ 

•プレイ MS - DOS (最終回） 

♦一歩進んだアマチュアプ□クラミンク* (最終回） 
* os 上でのブ□グラミング 

.命 {寸録 / ホ.ケツト M S - DO S コマンド表 




定価5的円 


コンピュータ技術者必携第2種•第1種•特種受験 


1 月号 


情報処理試験 


61年4月2種試験〈合格〉へのパスポート/ 


♦1 月号の主な内容 
特集 O P う^^， B 0 年度2種午前試験の完全研究 
特集 ❷1漂ぎ 60年度1種午前試験の完全研究 


大好評の 1 D 大講座 

受験のだめのコンピュータ基礎，実戦コンピュータの知識，関連 
知識征服ゼミー数学•工業•商業，完全マスター流れ図，合格必修 
ゼミー CAP - X . FORTRAN.C 〇巳〇 L . PL/I 


ザ • カンパニー❿ タンデムコンピューターズ 
コンピュータ最前線* 迷訳から名訳に近づいた启動翻訳 

カラー受験ゼミ* 出力装置 


そのほか、受験に役立つ記事が盛りだくさん。 
























特集 I 

ま、ファミコン 

ツインヒー/マッハライター/ 

マクロス/スターラスター ほか 

特集 II 

名作ロール 凝 
ゲ■ム研* 栏 

ウルテイマ II ， III , IV 
ウィザードリー 

徹底研究 /// A 

•スクリ-マ 

緊急レポート 

•プラステイ 


新春特別付録 

EEP カレンダ_ 1 的ら 



つ， SU — コニ》ビユ_3 ♦ファミコン人気ゲームのテクやマップが A ッチリ/ 

’86 ゲーム八ンド:^/ク •キミが書きこむスコア表•マップ表もっいている/ 

巳 eep 別冊•定価800円籲八日版144ページ テグザー/カラテカ/キン肉マン/ボートピア連続殺人事件/ガル咯 


コフミリ—义— EJ リ〇 籲「マリオの走り幅とひ」はじめ、おもしろゲ-ム19本/ 

おもしろゲーム大作戦 •ファミリーベーシックの実用テク ニ ックを紹介(機械語入門付） 

BEEP 編集•定価2,600円鲁日5判(本+カセットテ-プ） •ファミリーべーシックの開発にたずさわった八ドソン•竹部さん大いに語る。 

SOFT 

㈱ 日本ソフト A ’ ンク3。3.261 .4095 














Gallery by Xl/Xlturbo 


カラーイ メージボード 

スペースキーを ボン。まるで シャッターを 押すように 
テレビやビデオの画像が取り込める。カラーイメージボ 
ードは今いちばんウレシイ周辺機器だ0パソコンに落とし 
た画像は自由に編集でき，嬉楽画に移したり，プリント 
アウトするためのソフトもノ i 全。これはオシヤレ！ 





カラーイメージポードの⑱技術解説 


カラーイメージボードの特長を以ドにまと 
めてみよう。 

1) X1シリーズ令機種で利用できる 

I/O スロットに ボードを差し込み， コネク 
夕で外部 ュニット と接続するだけで，簡単に 
ビデオ/テレビ映像のデジタイズができる。敁 
近は FM77AV や MSX2 のようにビジュアル閲 
連に取点をおいた パソコン が 注 段を集めてい 
るが， Xl/Xlturbo シリーズでは カラーイメ 
ージボードを接続するだけでビデオデジタイ 
ズができるのだ。 

2) デジタイズが高速である 

デジタイズ時間は1/60秒，画像取り込み時 
問は Xlturbo で約 0.2 秒，XIでも約1秒と超 
心;速であるため，リアルタイムな画像処理が 
可能となる。 

3) 中問色で画像取り込みができる 

1) より，使 H] できる色は8色に限られるが， 
独自のスクランブル回路によってタイルパタ 
ーンで画像を取り込むので，きわめて自然な 


カラーデジタイズができる。また，ハードコ 
ピーをと るのに特別な フ 。リンタや ツールを 必 
要とせず，従来の周辺機器，グラフィックッ 
ールな どもそのまま使えるのだ 0 

それでは，カラーイメージボードによる画 
像取り込みの仕組みについて解説しよう。回 
路は人きく分けて3つの部分からなっている。 
外部 ユニット 内のデコーダ， ス クランブル回 
路とボード内の バッファ メモリである。 

デコーダは入力端户から人ってきたビデオ 
信り- (NTSC コンポジット）をデコードして 
RGB のアナログ信号に変換する。スクランプ 
ル回路はその信号を“0” と 44 1”のデジタル信 
号に変換し，パ、ッファメモリがそれを記憶す 
る。パソコン側ではそのデータを I/O ポート 
から読み出してグラフィックメモリに転送す 
るだ’けて’よい。 

スクランブル回路からの出力は，入力信号 
の RGB それぞれに ついて， その階調に応じて 
パルス （“0” と“ 1”） の数と問隔が変化する 


ようになっている。それはグラフィック画面 
のタイルパターンと M じであるため，きわめ 
て自然な中問色表現ができるのだ。また，64 
K バイトの容を持つバッファメモリにはシ 
リアルアクセス方式のダイナミックメモリが 
使われており，スクランブル信号をそのまま 
記憶することができるので，1/60秒という萵 
速デジタイズが口丁能となるのである。 

取り込み映像の調粮は外部ユニットの映像 
調整ボリュームと色介い.色の濃さ.階調の 
3つのノブでできる力す，ノブはドライバーで 
回す必要がある。取り込む「絵」によって細 
かく調整したくなるのがマニァ心というもの 
だ。もう少し扱いやすくしてほしかったよう 
に思う。 

カラーイメージボードはスクランブル回路 
を始めとするユニークなァイデァにより，回 
路構成がた いへんシン プルになって初めて货 
現した，ローコストで信頼性の高いビデオデ 
ジタイズシステムである。 （中川智哉） 


JO Oh!MZ 1986.1. 














SUPER RAM BOARD で 

アニメーション 

火容量 1 M バイトの SUPER RAM BOARD (デジッタ）にグラ 
フイック画面を収めれば，本格的なアニメーショングラフイック 
スだって Xl / Xlturbo にとって不可能ではありません。 


CG Gallerly 31 



















_ ずら D と揃った 
I 大容量 RAM ポード 



パソコンのメモリ拡張はとどまるところを知ら 
ずといった状況ですが',需要の増大と量産効果に 
よって RAM はこんなに手に入りやすくなってきた 
のです。メインメモリやビデオ RAM の増設から， 
大容量 RAM ディスクまで，使い方しだいであなた 
のパソコンは大幅にパワーアップです。 



for Xl/Xlturbo (- >204 ページ ) 



99,800円デジック 


32 Oh ! MZ *1986.1. 
































































L 0©0 ふたつの顔第 i 回 | 

タートルグラフィックスの世界 

——カメと画面処理 一一 


Mukouhara Ayumu 

向原あゆむ 

LOGO の XI turbo 版がついに登場です。タートルグラフィックスはもとより， XI turbo な 
らではの日本語処理機能やリスト処理など，さまざまなプログラミング言語の側面を見せ 
てくれることでしよう。これから面白い使い方が期待できそうですね。 


この日をどんなに待ちわびたことでしよ 
うか。 XI turbo でも LOGO (ロゴと読みま 
す）が動かせる日がやってきましたね。 L 0 
GO というプロダラミング言語は，何か教育 
ママのようなウサンクサイ印象を持ってし 
まいますが，そんな整苦しいことなど気に 
とめる必要はありません。私たちは，ター 
トルグラフィックスを備えたリスト処理言 
語を楽しめばそれでよいのです。 

それでは， LOGO とはどんな言語なのか 
兒ていくことにしましよう。なお，話は tu 
rbo LOGO を中心に進めていきますが ， LO 
GO の文法はどれも同じようなものですか 
ら，例題はほとんどそのまま他の LOGO で 
も動かせると思います。 

GE リスト処理に進む前に 

LOGO と言われて，少し常識ある人なら， 

「ああ，あのタートルグラフイックスのつい 
た子供のための言語ですか」と答えること 
でしよう。確かに，こういう考え方は， L 0 
GO の生まれた経緯から見れば非常に正し 
いことなのですが， LOGO のすべてではあ 


XI Turbo 1000 Mer 1 00 CwigM (〇 fittESS CO. .LTD. 


厶 


図 I この三角形がカメだって？ 


りません。タートルグラフイックスは ， LO 
GO にとっては f 供が自発的に学んでいく 
ための手段，つまりは教育という営業用の顔 
なのです。しかし，本来の顔は， LOGO の 
兄貴にあたる LISP からほとんどそのまま 
受け継いできたリスト処理機能なのです。 

LIPS は有名な人工知能用言語ですが，力 
ッコをやたら使うので，プログラムが見に 
く く敬遠されがちです。しかし， LOGO で 
はそのような欠点は多少修 E されています。 
このため，見やすい LISP として LOGO を 
使用することもできるのです。ですから， 
LISP で行われている人:!:知能をもっと身近 
なものとして体験することも可能でしょう。 

ところで，タートルグラフィックスとリ 
スト处理という2つの側面は， LOGO では 
うま〈•一体イ匕しているように見えますが， 
ここに落とし穴が隠されています。初心者は 
タートルグラフイックスに魅かれて LOGO 
を学び始め，グラフィックスに飽きたころ， 
リスト処理へ進もうとします。しかし，夕 
ートルグラフィックスを学ぶような感覚で 
リスト処理をやろうとしても，きっと挫折 
するに違いありません。そこには，はっき 
りとした気持ちの fe 換が必要なのです。考 
えてみれば，絵が h 手に描けたからといっ 
て，リスト処理ができるようになるわけ力 ？ 
ないのです。したがって， LOGO に接する 
ときには，自分の態度をハッキリさせてお 
かねばなりません。自分はタートルグラフ 
イックスをやりたいの力*，リスト処理をや 
りたいのかということを。 


それでは，これから LOGO のタートルグ 
ラフ ィッ クスについて説明していきたいと 
思います。これは次回に行う予定のリスト 
処理の前座みたいなものですから，気楽に 
読んでみてください。 

m カメとグラフィックス 

これまで，何の気なしに「タートルグラ 
フィックス」という言葉を使ってしまいま 
した力、これについて説明をまずしなけれ 
ばなり.ません。タートルとは海ガメのこと 
です（ちなみに，陸ガメはトータス）力す， 
このタートルを用いてお絵描きをしようと 
いうのが，タートルグラフイックスの世界 
なのです。 

カメとグラフィックス。この奇妙な取り 
合わせはどのようなものなの力*,これから 
説明していくことにしましよう。 

それでは， LOGO を起動して， 
SHOWTURTLE 
または， 

ST 

とキーボードから打ち込んでみてください c 
画面の中央に三角のしるしが現れてきます 
(図1)。何を隠そうこの三角形が，タート 
ルグラフィックスで主役を演じる夕ートル 
君なのです。こんな三角形がカメだって， 

と驚くのはまだ早い0このタートル君はか 
らだのどこかにペンを持っていて，自分の 
移動した跡に線を残していくのです。ター 
トル君は，「前進しろ」と力*，「後退しろ」と 
か，「右の方を向け」と力>，「左の方を向け」 
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といった人間からの指令を素直に実行しま 
す0このときに，タートル君の動いた跡が 
図形として残るというわけなのです。そし 
て，これがタートルグラフイツクス唯一の 
原理と言えます。これは，平面上に座標軸 
を設定して， I 座標が〇〇で!/座標が □□ 
の点から，： c 座標が△△で2/座標が X 父の 
点まで直線をくという， BASIC などのグ 
ラフイツクスとは根本的に異なっているのが 
わかるでしよう（実は LOGO でもズ座標， 

2/座標という概念はあるのです力 ? ，あまり 
強調されません）。たとえば，実際のプログ 
ラム（ひとつの命令？）と比べるとよくわか 
ります。 BASIC で直線を引く場合のプログ 
ラムは， 

LINE (〇〇，□口）- (△△， x x ) 
ですが，これが LOGO になると 
FORWARD ☆☆ 

となります。 FORWARD とはタートル君を 
前進させる命令で，上の例は 

「☆☆という距離だけ前進しろ」 

という命令，つまり， 

「☆☆という長さの直線を引け」 

という命令になります。ここには座標なん 
てものは出てきません。タートル君は，彼 
がいた場所から，彼が向いていた方向に ☆ 
☆という距離だけ進むだけです。これは， 


私たちがペンを持っ 
て紙の上に絵を描く 
の!:同じような感覚 
ですね。 

一般的には，絵を 
描くときに紙の上に 
座標軸を設定して， 

点（〇〇，□匚 1) か 
ら，点(△△， XX ) 
まで線を引けるなん 
て考えている人はい 
ないでしよう。この 
ように考えると，タート ル グラフ イツクス 
は，より自然な形で絵を描く方法だと言う 
ことができます。これなら，座標系が何で 
あるかを知らない小さな子供にも容易に理 
解することができますね（そもそも座標系 
とは，物の位置を把握するために人間が勝 
手に導入するものですから，算数なり数学 
なりで，そういうものがあることを教えら 
れなくては理解することができないでしよ 
う）。まあ，口上はこのくらいにして，実際 
にタートル君に動いてもらうことにしまし 
よラ〇 

ここでは，まず， FORWARD (省略形は 
FD ) と ， RIGHT (省略形は RT ) を使用し 
ます。 FORWARD は先程説明しましたが， 
RIGHT とはタートル君が現在向いている 
方向（三角形の頂点が向いている方向）よ 
り，与えられた角度だけ，さらに右を向け 
という命令です。ですから， 

FORWARD 150 RIGHT 120 

FORWARD 150 RIGHT 120 

FORWARD 150 RIGHT 120 

によって描かれる図形（図 2) は一辺の長 
さが150である正三角形となります。ここ 
で，最後の 

RIGHT 120 

は余分なような気がしますが，これはター 


トル君の状態を正三角形を描く前と同じ状 
態に戻すために付け加えたものです。絵を 
描く前後で，タートル君の状態（特に向い 
ている方向）を変えないようにすることは， 
いろいろな図形を組み合わせて描かせると 
きに必要となってきますから，今のうちか 
ら習慣にしてぉきましよう。 

ところで，前記の例ではまったく同じ命令 
を3回も入力しています。これは，あまり 
にも非効率的です。「以下の命令を3回繰り返 
せ」という命令があれば，すごく簡略化で 
きます（正三角形ならまだよいのですが， 

正100角形と力、正360角形を描かせようと 
すると，前のやり方では死んでしまうでし 
よう）。もちろん， LOGO でも繰り返しのた 
めの命令があって， REPEAT というのがそ 
れです。 REPEAT 命令は， 

REPEAT ☆ [ □ △ x 〇…] 

という形式で使用します。このとき，[と 
] で囲まれた中が☆回繰り返されます。つ 
まり，正三角形を描かせるためには， 
REPEAT 3 [ FD 150 RT 120] 

と入力すればよかったのです（省略形を使 
ってしまった）。ちなみに，正100角形なら， 
REPEAT 100 [ FD 10 RT 3.6 ] 
となり（図 3), 正360角形なら， 

REPEAT 360 [ FD 2 RT 1 ] 
となります（図4)。なぉ，これらの図形で 
は，図形が画面からはみ出ないように前進 
させる距離を適当に変えてあります。また， 
右を向く角度は（子供に教えるときには， 
試行錯誤から発見させるのが LOGO のやり 
方ですが)，凸多角形の外角の和が360°であ 
ることを知っていれば簡単に求まるでしよ 
ラ。 

0 命令どおりに動し、てね 

LOGO の特徴のひとつに，新しい命令を 
作り出せるということがあります。これは， 
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図4正360角形も円と区別できない 









?> 

?> 

?> TO 正三角形 
>> REPEAT 3 [ FD 150 
>> END 

正三角形 DEFINED 

?> 

?> 

?> 


RT 120 


?> 

?> 

?> 

?> 

?> 

>> 

>> 

正 

?> 

?> 

?> 

?> 


MAKE "REDEFP "TRUE 

TO 正三角形：長さ 

REPEAT 3 [ FD :長さ RT 120 

END 

三角形 DEFINED 


一連の操作に名前を付けることです。たと 
えば，先程の正三角形を描かせる命令， 
REPEAT 3 [ FD 150 RT 120 ] 

に“正三角形”という名前を付けると，そ 
れからは， 

正三角形 » 

と入力するだけで，正三角形が描かれるよ 
うになります。このように，新しい命令を 
作るための命令が TO です。これは英語で 
いうところの不定詞，つまり， 

TO +動詞の原形 
の形で用いられる TO のことです。これに 
は，「〜するためには」という意味がありま 
すから，新しい命令を定義するにはびった 
りな名前ですね（でも日本人にとっては関 
係ないか)。 TO を使って“正三角形”という 
命令を定義するためには， 

TO 正三角形 

と入力します。すると，プロンプトが 

?> 

から 

>> 

に変わって命令の定義が可能であることを 
教えてくれます。ここで， 

REPEAT 3 [ FD 150 RT 120 ] 

を入力したあと， 

END 

を入力して，定義の終了です（リスト1)〇 
さあ，これでこの“正三角形”という命令は， 
タートルが初めから知っていた命令（こう 
いう命令のことを LOGO ではプリミティブ 
と言います）と区別することなく使えるよ 
うになりました（これに対して， TO によ 
って定義された命令はプロシージャと言い 
ます)。たとえば，普通の命令と同じように 
“正三角形”という命令を使って， 

REPEAT 24 [正三角形 RT 15 ] 
という繰り返し命令を実行すれば，正三角 


形を回転させてできる図形を描かせること 
ができるのです（図5)。これは， BASIC で 
は見ることのできない特徴です（でも ， L 
ISP や FORTH では決してめずらしいこと 
ではありません。知らんぶり，知らんぷり}。 

ところで，前記のようにして定義した，“正 
三角形”という命令は，いつも一辺の長さ 
が150の正三角形しか描くことができない 
ので，おもしろ〈ありません 。 FORWARD 
などのプリミティブのように，命令に与え 
る引数で一辺の長さを指定したいというの 
が人情でしょう。つまり， 

正三角形50 

なら，一辺の長さが50の正三角形を描かせ 

る命令， 

正三角形100 

ならば，一辺の長さが100であるような正 
三角形を描かせる命令ということにしたい 
わけです。 LOGO では（ついでに， LISP や 
FORTH では）このようなことも可能です。 
LOGO の場合， TO 命令で命令を定義する 
とき，命令の名前に続けて仮引数を並べる 
ことで実現することができます。たとえば， 
正三角形を描かせる“正三角形”という命 
令の仮引数を“長さ”という名前にするこ 
とにすれば， 

TO 正三角形：長さ 
と入力することで，引数が付いた命令を定 


義することができます（：を付けるのを忘 
れないように）。このとき，“正三角形”と 
いう命令を実行するときに指定される数値 
は 

:長さ 

という名前で参照することができます。つ 
まり，“正三角形”という命令の定義を 
REPEAT 3 [ FD :長さ RT 120] 
としてやれば，自由な大きさの正三角形を 
描かせるための命令が定義できるのです（リ 
スト2)。ここで，少し注意があります〇 tu 
rbo LOGO の初期状態では，同じ名前の命 
令は定義できないようになっています。同 
じ名前の命令を定義したいときは， 

MAKE ” REDEFP ” TRUE 
と•いうオマジナイを実行しておいてくださ 
い。なお，先程定義したばかりの，“正三角 
形”という命令の実行結果を図6に示して 
おきましよう。 

これまでの説明で，正三角形を描かせる 
命令を定義する方法はわかったと思います。 
それでは，もう一歩進んで，正多角形を描 
かせるための命令の定義はどうなるで丄よ 
うか。もうくどくどとは説明しません力 ? ， 
そのプログラム（新しい命令の定義の仕方） 
はリスト3のようになります。また，この 
ときの実行結果を図7に示しておきましよ 



図5正三角形を回転してみました 


図6正三角形，正三角形，正三角形， 
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?> 

?> 

?> 

?> 

?> 

>> 

>> 

正 

?> 

?> 

?> 


TO 正多角形：角の数：辺の長さ 
REPEAT :角の数 [FD :辺の長さ 
END 

多角形 DEFINED 


RT 360 / : 角の数 ] 


自分自身で自分を定義 

LOGO は LISP をモデルにしてあるだけ 
あって，再帰もお手のものです。再帰につ 
いてわざわざ説明する必要はないと思いま 
すが，念のために言っておけば，自分自身 
を使って自分を定義することです。たとえ 
ば，タートル君に図8のようならせん図形 
を描かせることを考えます。これは， 


うとすれば，光程の REPEAT を使うこと 
が頭に浮かびますが，次のように考えるこ 
ともできます。つまり，“自分自身”を定義 
するためには，前進し，右に回転したあと 
“自分自身”を再び実行すればよいことにな 
ります。これを LOGO のプログラムになお 
せば， 

TO らせん：距離：角度 

FD :距離 RT :角度 


?> 

?> 

?> 

?> 

?> 

?> 

>> 

>> 

>> 

>> 

ら 

?> 

?> 

?> 

?> 


TO らせん：鉅離：角度 
IF : 距離 〉250 [ STOP ] 
FD :距離 RT :角度 
らせん：距離 + 2 :角度 

END 

せん DEFINED 


FD 

2 

RT 

90 

らせん：距離 

+ 2 :角度 

FD 

4 

RT 

90 

END 


FD 

6 

RT 

90 

となります。 


FD 

8 

RT 

90 

まさに“らせん” 

という命令を定義する 

FD 

10 

RT 

90 

のに，“らせん”自身が使われているのがわ 

かるでしよう。この“らせん”命令を使っ 


という具合に，1回前より2だけ長い距離 
を進んだあと90°だけ右に回転するという 
命令を何度も繰り返すときに得られるもの 
です。こういう動作をする命令を定義しよ 


て W 8の図形を描かせるためには， 

らせん 2 90 

を実行すればよいのです。しかし，この* 4 ら 
せん”命令には承人•な欠陥があります。つ 


まり，一度命令を実行させたら最後，ター 
トル君は終わることなく図形を描き続ける 
のです（このときは CTRL-C で止めるしか 
方法がありません)。これは“らせん”とい 
う命令の定義の中で，いつこの命令の実行 
をおしまいにするのかを指示してないから 
です。たとえば，変数“距離”の値（：距 
離のこと）が，250より大きくなつたとき， 
実行を終わらせることにしましよう。このと 
きは，プログラムの最初で， 

IF :距離 > 250 [ STOP ] 

という命令を入れておきます。つまり，完 
璧な“らせん”というプログラムはリスト 
4のようになります。ここで，もう一度 
らせん 2 90 

を実行してみましよう。今度はちゃんと止 
まりましたね。 

なお IF という命令は BASIC の IF 文と同 




図 7 いろいろな正多角形です 図 9 a らせん 2 89 図 9 白らせん 2 170 




• 図 8 らせん図形です 
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図 9-C らせん 2 121 


図 9-D らせん 2 182 

































?> 

?> P 0 "例 1 



TG 例 1 :辺 


レベル 

IF :レベル 

= 

0 [ FD : 辺 STOP 

例 1 :辺/ 

し T 90 

2 

:レベル - 1 

例 1: 辺/ 
RT 180 

3 

:レベル - 1 

例 1 :辺/ 
し T 90 

3 

:レベル - 1 

例 1 :辺/ 
END 

?> 

2 

:レベル ~1 



?> 




?> 

P0 " 例 

2 


T0 

例 2 : 

辺 

:レベル 

IF 

:レペル 

= 0 [ FD : 辺 STQP 

し T 

60 



例 

2 :辺 

/ 

2 : レベルー 1 

RT 

120 



例 

2 :辺 

/ 

2 : レベル ー 1 

例 

2 :辺 

/ 

2 :レベル ー ： L 

し T 

120 



例 

2 :辺 

/ 

2 : レベル -1 

RT 

6G 



END 



?> 




?> 




?> 




?> 





図 13 置き換えの原則 



じで， IF の次に書かれる条件式が成立する 
とき，決められた命令を実行するものです。 
IF ☆ [ □] 

という命令は☆で示される条件式が成立す 
るとき□という命令（複数個あってもよい 
のです）が実行されます。また， 

IF ☆ [□][△] 

という命令は，条件が成立するとき□を， 
成立しないとき△を実行するものです。 

ところで，この“らせん”という命令は 
ナカナカ味のある命令で，：角度という引 
数に渡す値をいろいろと変えてやれば，美 
しい図形を描かせることができます。図9 


にいくつかの例を載せておきましよう。こ 
のほかにも各自で試してみてください。と 
きには予期しないような図形が描かれるこ 
とがあるかもしれませんよ。 

@ 1本の直線から 

LOGO では再帰的に命令を定義できるこ 
とがわかったと思います。再帰とは，自分 
で自分を参照することでしたから，この機 
能を用いれば，自分の‘部が自分と同じよ 
うな形をしている図形（いわゆる自己相似 
型の図形）を簡単に描かせることができま 
す。このような図形の一例を図10〜図12に 



?> 

?> 

?> 

?> 

?> 

?> P 0 ，'例 3 

TO 例3 :辺：レベル 

IF :レベル= 0 [ FD :辺 STOP ] 

し T 90 

例3 ••辺/ 2:レベル-1 

RT 90 

例3 :辺/ 2:レベルー1 
RT 90 

例3 :辺/ 2:レベルー1 
例3 :辺/ 2:レベルー1 

し T 90 

例3 :辺/ 2:レペル -1 
し T 90 

例3 :辺/2:レベル —1 

RT 90 

END 

?> 


示しましょう。これらは結構複雑な図形で 
すが，図形を描く手順はいたって単純です。 
つまり，1本の直線を一定のパターンで置 
き換えていく操作をするだけでできあがっ 
てしまうのです。たとえば，図10を見てみ 
ましようこれは1本の直線を 


というパターンで置き換えてやるとできあ 
がります。図10は90°回転していますが, 
全体や，その--•部をながめてみても，どち 
らも 


というような形をしているのがわかると思 
います。図10〜図12の図形が，直線に対し 
てどのような置き換えをすれば得られるの 
かということを，図13に示してあります力夂 
どれもみな単純な置き換えしかやってない 
ことがわかるでしよう。ここでは，何回置 
き換えが行われたのかを示すために“レべ 
ル”という言葉を用いています。つまり， 
もともとの直線がレベル0で，それを一定 
のパターンで置き換えたものがレベル1， 
レベル1の直線部分を前と同じパターンで 



図10自己相似型の図形（その丨 ） 図丨丨自己相似型の図形（その 2) 図12自己相似型の図形（その 3) 
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図 17 有名な再帰曲線の置き換えの規則 



置き換えたものがレベル2，レベル2の直 
線部分を前と同じパターンで置き換えたも 
のがレベル3，……，という具合です。 

これらの図形をタートル君に描かせるた 
めには，最終的なレベルを指定して（たと 
えば n としましよう），それをひとつだけレ 
ベルの 小さい図形（レベル n —1) で描かせ 
ればよいのです。すなわち，レベル n の図 
形を描かせるためにげ，レベル n — l の図形 
を直線とみなして，パターンの図形をなぞ 
ればよいのです。ですから，図10〜図12の 
例を描かせる LOGO プログラムは，リスト 
5〜7のようになります。なお，プログラ 
ム中の LT という命令は LEFT の省略形で， 
タートルを左に回転させるための命令です 
(つまり， RIGHT の反対です）。 

ところで，自己相似型の図形として有名 
なものに，雪片曲線（図 14) の一辺， C 曲 
線（図15)，ドラゴン曲線（図 16) といった 
ものがあります。ご覧のように，これらの 
図形は独特な形をしていますが，これらも 
みな，1本の直線を特定のパターンで置き 
換えたものにすぎません。どのような置き 


換えがされているのかは図17に示してある 
とおりです。このうちで C 曲線とドラゴン 
曲線は非常によく似ているのがわかると思 
います。これについて，少しばかり説明し 
ておきましよう。 

実は，ドラゴン曲線には同じ レベルで 右 
回りと左回りの2種類の曲線があって，も 
との直線が右回り左回りの順に交互に置き 
換わっていくのです。もし，ドラゴン曲線が 
右回りのものしかなければ，それは C 曲線 
とまったく同じものになっ.てしまうでしよ 
う。原理的にはほとんど同じものなのに， 
その割には全然違った曲線になってしまう 
うのですから不思議なものですね。まあ， 
それはともかく，リスト8に，雪片曲線， 

C 曲線，ドラゴン曲線を描かせるプロダラ 
ムを示しておきます。これからわかると思 
いますが，雪片曲線は“雪片曲線の辺”を 
一辺にして正三角形を描かせるときにでき 
るものですね。この他にも，これまでに示 
してきた自己相似型の図形を一-.辺にして多 
角形を描かせてみたり，回転させたりして 
みましよう。いろいろな図形ができて，な 


かなか楽しいものです。図18はその-•例で， 
図11の図形を一辺にして正六角形を描かせ 
たときにできる図形です。 

回 7匹のカメを使って 

turbo LOGO の タート ルグラフイ ツ クス 
での最大の特長は，タート ルを 7四まで扱 
うことができることです。これについて説 
明しましょう。 

7 匹のタートル君は，名前を1，2，3, 
4， 5， 6， 7と言います（そっけない名 

前ですね)。これらのタートル君たちを動か 
したいときは， ASK 命令を使って名指しで 
命令を伝えてやります。たとえばタートル 
君3に150の距離だけ前進させたければ， 
ASK 3 [ FD 150 ] 

というように入力します。っまり， ASK の 
後ろの名前，その後にやってもらいたい動作 
を[と ] で囲んだものをもってくるのです。 
このとき画面上に直線が引かれることにな 
りま十（図 I 9 )。しかし，ちょっと待ってく 
ださい。線は引かれるのですが，肝心の夕 
ートル君3の姿が見えません。画面の中央 
にも夕ートル君はいますが，彼は夕ートル 
君7なのです。きっと，7以外のタートル 
君は恥ずかしがりやなんですね。かなり前に 
説明した ST 命令で姿を兒せてもらいまし 
よう。このための命令は，もちろん， 

ASK 3 [ ST ] 

です。タートル君3は画面に紫色の姿を現 
しました（図20)。ここで，勘のいい人なら 
気付くと思いますが，7匹のタートル君た 
ちは，自分の名前で表される色 （1 が青色， 

2が赤色，3が紫色，4が緑色，5が水色， 
6が黄色，7が白色というよくあるやっで 
す）と同じ色をしているのです。これを知 
っていれば，画面上に何匹ものタートル君 
が出てきても，誰が誰だか区別することが 
できます。 



図 14 雪片曲線 （レベル 4) 図 15 C 曲線 （レベル 10) 図 16ドラゴン 曲線 （レベル 10) 
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この ASK 命令を使えば，7匹のタートル 
君を自出に扱うことができるのですが，そ 
れぞれのタートル君に同じ命令を与えるた 
めには，必要なタートル君の数だけ ASK 
命令を描かなければならないのがイ〈便です。 
そこで， EACH 命令を紹介しましよう。 

この EACH 命令は，あらかじめ TELL 命 
令で衍示されたタートル君に対して，同じ 
命令を順々に与えていきます。 TELL 命令 
というのは，必要なタートル君の名前を並 
ベたものを[と]で W んでやって指示しま 
す。たとえば， 

TELL [135] 

を次:行すれば， EACH 命令ではタートル君 
1と，夕ートル君3，夕ートル君5に命令 
を夺えることができます。そして，その E 
ACH 命令というのは，それぞれの夕ートル 
岩にやってもらいたい動作を[と]で囲ん 
で指示するのです。たとえば，今の場合， 
EACH [ST FD 150 ] 

は， 

ASK 1 [ST FD 150 ] 

ASK 3 [ ST FD 150 ] 

ASK 5 [ ST FD 150 ] 

と同じことになります。ところで ， TELL 



図 18 図 II の図形を丨辺とする正六角形 



?> 

?> 

?> 

?> 

?> P 0 "雪片曲線 

T 0 雪片曲線：距離：レベル 

REPEAT 3 [雪片曲線の辺：距離：レベル RT 120 ] 
END 

?> 

?> PQ "雪片曲線の辺 

TG 雪片曲線の辺：距離：レベル 


IF :レベル = 

□ [ FD : 

:距離 STOP 

雪片曲線の辺 

:距離 

/ 

3 

:レペル 

し T 60 





雪片曲線の辺 

:距離 

/ 

3 

:レベル 

RT 120 





雪片曲線の辺 

:距離 

/ 

3 

:レペル 

し T 60 





雪片曲線の辺 

:距離 

/ 

3 

:レペル 


END 

?> 

?> PQ " C 曲線 

TG C 曲線：距離：レベル 

IF : レベル = □ [ FD :距離 STOP ] 

し T 45 

C 曲線：距離/ 1. 4142136 :レベルー1 
RT 90 

C 曲線：距離/ 1. 4142136 :レベル - 1 
し T 45 
END 
?> 

?> P 0 "右ドラゴン曲線 

TG 右ドラゴン曲線：距離：レベル 

IF : レベル = 0 [ FD :距離 STOP ] 

し T 45 

右ドラゴン曲線：距離/ 1. 4142136 :レベル ー： L 
RT 90 

左ドラゴン曲線：距離/ 1. 4142136 ••レベルー1 

し T 45 

END 

?> 

?> P 0 "左ドラゴン曲線 

TG 左ドラゴン曲線：距離：レベル 

IF : レベル = 0 [ FD :距離 STOP ] 

RT 45 

右ドラゴン曲線：距離/ 1. 4142136 :レベル - 1 
し T 90 

左ドラゴン曲線：距離/ 1. 4142136 :レベル - 1 
RT 45 
END 
?> 

?> 

?> 



図19タートル3の姿が見えない 図20タートル3が姿を現した 


LOGO ふたつの顔 39 




















命令によって，どのタートル君が指定され 
ているのかを知りたいときがあります。こ 
のために， turbo LOGO には WHO という 
関数があります。この関数は， TELL 命令 
で指定されているタートル君たちの名前の 
リストを#:とします。 

SHOW WHO 

と入力してみてください。先:程の TELL 命 
令を実行した後なら，_面に 
[13 5] 

と表示されるはずです （ SHOW 命令は関数 
などの値を画面に出力するときに使う命令 
で，よく似た機能を持つ命令に PRINT と 
いうものもあります)。 LOGO では，このよ 
うに[と]で囲まれたものをリストと呼び 
ます。つまり，前記の例は1，3, 5を要素す 
するリストと言えます。まあ，これだけの機 
能しかないのならば， WHO 関数の使い道 
はあまりないでしよう。しかし， WHO 関数 
はもうひとつの重要な機能があるのです。 

それは， WHO 関数が EACH 命令の [] 
の中で使われる場合です。このときは， 
そこの EACH で実行されるべきタートル君 
の名前が値になります。たとえば，先程の 
TELL 命令に対して， 



図21 7匹のカメです 
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EACH [ FD WHO * 20 ] 

は， 

ASK 1 [FD 1 * 20 ] 

ASK 3 [ FD 3 * 20 ] 

ASK 5 [ FD 5 * 20 ] 

と向じことになります。これが理解できれ 
ば， 

TELL [ 1 2 3 4 5 6 7] 

EACH [ ST ] 

EACH [ RTWHO * (360/7) FD 150] 
で何が起きるのかわかりますね。もちろん 
W 21 のような図形になります。さて，今ま 
では，タートル君の動いた跡は色の軌跡 
が残りました力 ? ，これは SETPC 命令で変 
更することができます。つまり， 

SETPC ☆ 

という形で使闬し，☆のところには色を表 
す数値（これはタートルの色と名前の関係 
と同じ）を書きます。つまり， 

EACH [ SETPC WHO ] 

という命令を実行すると，タートル君の色 
と，その軌跡を同じ色にすることができる 
のです。せっかくですから，それぞれの夕 
ートル君たちが，自分自身の色の軌跡を残 
しながら図形を描いてい〈例を挙げておき 
ましよう。最初は， 

TELL [ 1 2 3 4 5 6 7] 

EACH [SETPC WHO ST ] 
REPEAT 1000 [EACHLRT 

RANDOM 360 FD 10]] 
です。これは，乱数関数 RANDOM を使っ 
てタートル君の向きを決めて，ひたすら前 
進させるだけの命令です。タートル君たち 
はみんな勝手に動きますから， REPEAT 命 
令で10001 n | も繰り返すと，|由|面の I .で7つ 
の色が混じりあってなかなかきれいです（図 

22) 。 もう少しまともな例としては，ドラゴ 
ン曲線を4匹のタートル君に描かせます（図 

23) 。 これは， 



図22足の向くまま気の向くままのグチヤグチヤ曲線 


TELL Ll 3 5 7] 

EACH [ST RT 45* ( WHO -1)] 
EACH [SETPC WHO ] 

EACH [右ドラゴン曲線150 8 ] 

によるものです。 

今 W は， LOGO のふたつの顔の片面であ 
る夕ー トル グラフイ ッ クスに 注目してみ ま 
した。次回は，もうひとつの顔，つまり 
LOGO が LISP から受け継いだ リス ト処理 
の紹介をやりたいと思います。 

参考文献 

1) 『turbo LOGO (漢字版}ューザーズマニ 

ュアル』 

2) 小谷善行：『パソコン LOGO プログラミ 
ンダ』，柬海大学出版会，1984半 

3) ピータ_ •ロス（倉谷直臣訳）：『やさ 
しい LOGO 入門』，啓学出版，1985年 

4) マ_チン •レッサー （奥和宏訳）：『パ 
ソコンのためのロゴ』，啓，' f : 出版，1985年 

5) こ力もとやすひこ ： r MZ LOGO 入門夕 
_トルグラフィック 』， Oh ! MZ 1983年 
9月号 

6) こうもとやすひこ： 『 LOGO とグラフイ 
ックス 』， Oh ! MZ 1984年 2月号 

1 ) はもちろん turbo LOGO の マニュアル。 
基本的には命令の解説だけしか載つていない 
が， ブリミテイブ（基本命令）の フルネーム 
とその読み方（なんとカタカナ）が付録とな 

つているのが H 新しい。このマニュアルだけ 

では LOGO の概要を知るのは難しいが， 2) 〜 
4) あたりを参考にすればよいだろう。 2) は F 
M LOGO , 3) は Terrapin LOGO , 4) は LCS 
I LOGO をもとにして書かれている力 :’， LOG 
0の文法はどれも似たようなもの （Terrapin 
LOGO は他に比べて少し異なるが）なので混乱 
はしないであろう。とくに 4) はリスト処理に 
ついて詳しく述べられている。5)， 6) は Oh ! 
MZ で取り I ••げられた LOGO のタートルグラフ 
イックスに関する記事 0 MZ LOGO は turbo 
LOGO とロウアーコンパチ（こんな， V 葉はあ 
るのかな）であるから，これらの記事のサン 
プルは（プリミティブの名前を小文字から大 
文字に商すだけで）ほとんどすベて turboLO 
GO で勋かすことができる。 



図23 4つのドラゴル曲線を組み合わせました 
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皆さんは BASIC をどのように使っています 
か？ ゲームや実務プログラムなど目的を達 
成するための手段でしょうか。マシン語やほ 
かの言語を勉強するためのひとっの過程でし 
ょうか。それと も BASIC それ自体が遊びの道 
具になっているのでしょうか。 

人によって考え方はさまざまでしょうが， 
それでも BASIC をまったく使わないというパ 
ソコンユーザーはほとんどいないと思います0 
アクション，アドベンチャー，ロールプレイ 
なんでもこいの ゲーマーで あっても，アセン 
ブラがビンビンのマシン語プログラマであっ 
ても， Lisp や Prolog , Forth , C を使いこな 
す言語博士であっても，ハンダごてバンバン 
のハードマニアであっても，やっぱり BASIC 
は使うのです。 

パソコンに標準装備の言語だから，という 
理由だけではありません。 BASIC は遅い， 
メモリを食うという大きな欠点を持ってはい 
ますが， Beginer’s AH-purpose 〜の名のと 
おり誰もが多方面に利用できるツールであり， 
そのマシンの特長をもっともよく表したソフ 
トウ I アなのです。また，パソコン雑誌に掲 
載されるプログラムの多くは BASIC で窨かれ 
ています0機種によって方言があるといって 
も基本的なところに違いはないので，ちょ 
っと頑張ればほとんどすべてのプログラムが 
利用できます。 

BASIC は私たちにとってもっとも手鞋なマ 
シンとのインタフェイスです。使い方しだい 
でパソコンライフか•大きく変わります。今回 
の特集では BASIC の基本を徹底して追求し， 
多角的なアプローチでプログラミングを楽し 
むためのヒントがいっぱいです。これを参考 
に新たなる“行動”を起こしてみませんか。 


第1部私の BASIC 行動学 
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ボケコンを使ってみよう 
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暇プロの楽しみ 

■Izumi Daisuke 

泉大介 


リスト1 蛇の迷走 


1000 DIM SX<10),SY(10) 

1010 SX<10)=1 : SY(10)=0 : CONSOLE C40 : PRINT CHR*<12) 

1030 REM - 

1040 し E=RND< 1>*11 : VX=INT(RND( ： l 〉 本 : VY=INT(RND< 1)*3>-1 

1050 FOR 1=1 TO し E 

1055 IF (VX=0 〉 本 THEN VX=1 

1060 IF SX(10)+VX>39 THEN VX=-1 

1070 IF SX(10>+VX«C0 THEN VX = 1 

1080 IF SY(10)+VY>23 THEN VY=-1 

1090 IF SY(10)+VY<0 THEN VY=1 

1100 FOR J=0 TO 9 

1110 SX(J)=SX<J+l) : SY<J)=SY(J+l) 

1120 NEXT 

1130 SX<10)=SX(10)+VX : SY<10)=SY<10)+VY 
1140 GOSUB 5000 
1150 NEXT 
1160 GOTO 1030 

1170 REM - 

4990 END 

5000 CURSOR SX(0> ,SY<0) : PRINT ** "； 

5010 FOR J=1 TO 9 

5020 CURSOR SX(J),SY(J)SPRINT "D"; 

5030 NEXT 

5040 CURSOR SX(10) ,SY(10) SPRINT "5)"; 

5050 RETURN 


つれづれなるままに，日 ぐら し パソコン 
にむかひて，七、に うつりゆ くよしなし事を， 
そこはかとなく打ちつくれば，あやしうこ 
そものぐるほしけれ。 

人は時に暇をもて余してしまうことがあ 
ります。何をしようという訳でもなく，し 
なければいけないこともない。何とはなし 
にコンピュータの電源を入れて， BASIC を 
起動してみる。さて，何をしようか。 

暇プロ（暇々プロダラミング）はこうし 
てスタートします。いくら Pg を持て余して 
いても，時間が無尽蔵にあるはずもないの 
で，一本の完結するプログラムを作るのは 
まず無理なこと。もっともゲームを作ろう！ 
などと思い立ってコンピュータに向かうの 
は，暇プログラマの資格なしですな。 

||短時間で簡単に 

それでは，暇プログラマはコンピュータ 
に向かって何をするの力*。これは例を見て 
もらったほうがわかりやすいでしよう。 

リスト1。これは画面の中を所狭しと蛇 
が走りまわるプログラムです。ただ走りま 
わるだけ。 

このとき私の頭の中には，迷路の中を蛇 
が走りまわって何かするゲームを作ろうか 
なァという思惑があったのです。けどそん 
なものを作るには，ちゃんと紙の上で練っ 
てからでないと，後々泣きを見るのは明ら 
かでしょう。とりあえず蛇だけでも動かし 
てみる力、。これが暇プロの極意ですな。コ 
ー ヒ ー でも入れて， さあ一 て，とものの10 
分ほどで蛇は動き始めます。 

暇 プロの 魅力は ここに もあって， 即 動か 
して楽しむことができるのは，長い プロ グ 
ラミングにはない良さです。 3分も見てい 
ると鉋きてきて，障害物などを中に入れて 
やりたくなります。ついでにブッかったと 
42 Oh!MZ 1986.1. 


きの衝突音も欲しくなります。そうこうす 
るうちに夜は更けてきて，「も一寝よ一っと J 。 
私はこのとき，習惯的にプログラムを NEW 
してしまいます。戯れは戯れであって，あ 
とからそれを改良していこうという気はサ 
ラサラないからです。 

初心者と呼ばれる方々にとっては，ずい 
分もったいないことをするなアと思われる 
かも知れません。けれど，今日ここまで作 
る段階で得たノウ•ハウは，しっかり自分 
のものになっているでしよう？ それが大 
切なのですよ。こうして得たテクニックは， 
次に何かを作ろうとしたときに必ず役に立 
つでしよう。 

暇プロの題材はどこにでも転がっている 
ものです。リスト2は，某テレビ漫画を見 
ていたときに思い立ちました。 

登場人物が何かにブッかり気絶すると， 
必ずといっていいほど頭のまわりを星か何 
かがくるくると飛びまわりますね。そのシー 


ンを見ているうちに，この程度のことなら 
……と作ってしまったのです。 

座標がデータ文で蓄えてありますが， 
これを見て，「どこが暇プロだ！画倒くさ 
いじゃないか」とおっしゃる方があるかも 
知れませんね。甘い。誰もご丁寧に三角関 
数など使って計算したりしません。そ一ゆ 
一面倒な方法は暇プロの精神（私の中にあ 
るだけです。念のため）に反する。 

ではどうやるかというと，まず画面のド 
マンナカ（19,11くらいが適当でしよう）にデ 
ンと▼を書きます。そのまわりに，いかに 
もそれらしく ♦をまあるく配置。あとは力 

ーソルを動かしな力 ？ ら，イチ，ニイ と座 

標を数えるだけです。得た座標を DATA 文 
中に書き込んで，ハイおしまい。簡単でし 
ょぅ？ 

暇にまかせてコンピュータに向力 U 、， プロ 
グラミングをする。そのときに「うっ，面 
倒くさい」と思ったら最後，それ以上続け 






























特集 BASIC “行動学”入門 


リスト2 |丨星が飛びまわる 


100 CONSOLE C40 

110 CURSOR 17,10 : PRINT 

120 CURSOR 5，15 : PRINT "Daisuke, flying around Yukie" 

130 X=14 s Y=S 

140 FDR 1=1 TD 10 

150 XB=X : YB=Y 

160 READ X,Y 

170 CURSOR X,Y : PRINT "4 "； 

180 CURSOR XB,VB : PRINT ""； 

190 FOR J=0 TO 30 : NEXT 
200 NEXT 
210 RESTORE 
220 GOTO140 

1000 DATA 16,7, 1 日， 7,20,8,21 ， 10,20, 12 
1010 DATA 18,13,16,13,14,12,13,10,14,8 


I ス 


1 


HAPPY BIRTHDAY 


1000 

1010 

1020 

1030 

1040 

1050 

1100 

1110 

1120 

1130 

1140 

1150 

1160 

1170 

1180 

1190 

1200 

1210 

1260 

1270 

1280 

1290 

1300 

1990 

2000 

2010 

2020 

2030 

2040 

2050 

2060 

2070 

2080 

2090 

2100 

2110 

2120 

2130 

2140 


CONSOLE C40 
□FST=0 : GOSUB 1100 
0FST=6 : GDSUB 1100 
□FST=12 : GOSUB 1100 
USR(»0F14) 

END 


FOR 1=0 TO 4 

READ : USR ( 车 0F14> 

IF I-INTd/2) *2 THEN 1200 

REM - 

FOR J=1 TO 39 
CURSOR 0,0 FST+I 
PRINT RIGHT$(A«,J )； 

NEXT 

GOTO 1290 

REM - 

FOR J=1 TO 39 
CURSOR 39-J,0FST+I 
PRINT し EFT$<A$, J) 

NEXT 
NEXT 
RETURN 
REM 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
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る気がしなくなってしまう私にとって，こ 
ういうてきと一にその場をやりすごす手法 
というのは重宝するのです。 

このプログラムに 少し手を加えれば，太 
陽系もできるでしよう。もっとも惑星を9 
個も回すのでは，速度の問題がチヨットと 
いう気もしますが，また，隅のほうに〇を書 
いて， さらに 長い楕円軌道でピリオドを飛 
ばしてやれば「ハレー彗星地球に接近！」 
なんてことも可能でしよう。 

ひとつの手法を応用するだけで，このよ 
うに暇プロの世界はさらに広がっていくの 
です。 

||ちよっとしたヒントに 
■11 改良を加えて 

リスト3のプログラムが生まれたいきさ 
つはこうです。私の友達のひとり力す，めで 
たく誕生日を迎えたときに，これはひとつ， 
コンピュータで HAPPY BIRTHDAY をや 
ってやらねばなるまい，と考えたのが事の 
起こりでした。そのままパッと表示してしま 
うのは，いとわろしでしよう。1行ずつス 
クロール アップするのは，誰でも考えつき 
そうでおもしろくない。かといって横スタ 
，ロールは， マシン語でも使わない限り遅す 
ぎて使いものになりません。う〜む，困っ 
た困った。 

そこでふと思い出したのが，以前計算機 
実習（大学に行けばわかります。受験生の 
皆さん頑張ってください）のときに目にし 
たデモです。そのままでは処理が面倒なと 
ころがあったので，さらに簡素にして実現 
してみたというわけです。 

左から，あるいは右から，文字が1行ず 
つ横 スクロールし てきて，画面を作りあげ 
ていきます。この手法は以来気に入って し 
まい，ことあるごとに RUN しては鮑きもせ 
ずに眺めています。 

そのままでは寂しかったので，リスト3 
では BEEP 音を入れてあります。どうです 
か。いとをかし，でしよ？ 

11すぐに作ってすぐ遊べ 

私は実は非現代人であります。というの 
は，情報化社会から取り残されているから 
です0つまり，私はテレビを持って いない 
のです。ところが隣の住人は文化人で，流 • 
行に遅れもせず テニスを やっているらしい。 
で，夜中になると， テニスの ゲーム中継を 


テレビ観戦し始めるわけですね。悲しいか 
なわがおんぼろアパートでは，その音がよ 
く聞こえるのです。さらに追い打ちをかけ 
るかのごとく， MZ - 2000ではテレビが見れ 
ない！ 「 XI は見れるじやね一か。てめ一 


この野郎一根性出せ！男は気合いだ！」と 
おたけっても，無理なものは無理なので， 
モンモンと した気分を 抱えつつ， 私の指は 
テニスゲームを 作り ま した。 

ひとこと申し上げます。私は独身です。 
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品行方正，勤勉な人間です。というわけで, 
同棲もしていません。 

つまり， テニス ゲームを作っても2人で 
は遊べないわけです。とあたかもそれが理 
由であるかのごとく，リスト4はひとりテ 
ニス。 スカッシュをひとりでやるようなも 
のとなっています。 

本当は，すぐに作って，すぐさま遊びた 
かったからで，蛇のときでも書いたように 
私の暇プロにとってこれは命なのです。 

このテニスゲームも， 私の 暇プロの特徴 
をよ〈表しています0すなわち， シンプル 
イズ ベスト。 余計なものは一切 付いてい ま 
せん。これを改造して，相手をつけてみた 
り，得点を表示するようにすれば， ゲーム 
がひとつ出来あがりとなります。 

10分も遊んでいれば鮑きてきて，改良に 
手を出し始めるところなのですが，皆さん 
が暇プロで改造してもらえればと思い，あ 
えて最初に作ったものを載せてみました。 
自分だけのテニスゲーム。挑戦してみてく 
ださい。 

||気楽なお付吉合いを 

チョコチョコっ と作って RUN 。 ピッ！ 
ERROR 。 あれ〜 エ， おかしいな。何がマズ 
イんだ？ あっそ一かそ一か。手直しをし 
て再び RUN 。 う〜ん，どうも気にくわん。 
ここをチョッと変えてと。とまあこのよう 
にして私の暇プロは 続いて いきます。決し 
て肩に力が入ったり，意気込んでやりはし 
ません。 

余暇を音楽を聴いて過ごす人。絵を見て 
過ごす人。バイクを転がしに出かける人。そ 
れと同じ調子で，私は短いプログラムを作っ 
ては壊し，壊しては作り，手直しして RUN 。 
まアこんなもんだろ。そして飽きたら NEW 。 
それこそ，つれづれなるままに，日ぐらし， 
です。 

プログラムを作って，それで飯を食って 
いるわけではありません。趣味は趣味。盆 
栽をいじって目を細めている人のように， 
コンピュータと付き合っていきたい。これ 
が私の主張です。 

さて，私の部屋には目覚まし時計があり 
ます。卒業記念に贈られたもので，デザイン 
も気に入っているのです力 5 '，1年ほど前か 
らストライキを起こしていてベルが鳴らな 
いという困りものです。連日夜が遅いため， 
44 Oh!MZ 1986.1. 


スト4 || ひとりテニス 


- IT - 

100 

PRINT CHR*(6> : REM XI 

=12 

110 

GGSUB 1000 


120 

REM ========== 


130 

FOR し =0 TO1 


140 

GET A* : IF (A$="4")+(A$="1") THEN 160 

150 

GOTO 190 


160 

DN 1-<A*="1") GOSUB 1200,1300 

170 

CURSOR し X, し B •• PRINT " 

••5 

180 

CURSOR し X, し Y s PRINT " 

ド , ； 

190 

NEXT 


200 

REM - - - 


210 

XB=BX : YB=BY 


220 

IF BX+VX<1 THEN VX=1 


230 

IF BY+VY<1 THEN VY=1 


240 

IF BY+VY>23 THEN VY=-1 


250 

BX=BX+VX : BY=BV+VY 


260 

IF BX03B THEN 400 


270 

IF <BY>LY — 3) 拿 （ BY< し Y+3> 

THEN 300 

280 

MUSIC "-E4-D-C" : GOTO 

100. 

290 

REM - 


300 

MUSIC "AO" 


310 

VX=-1 


320 

REM - 


400 

CURSOR XB,VB s PRINT " 

H • 

410 

CURSOR BX, BY : PRINT "| 

»"； 

420 

GOTO130 


430 

END 


1000 

REM ======2==r=s= 


1010 

FOR 1=1 TO 38 


1020 

CURSOR 1,0 : PRINT 


1030 

CURSOR 1,24 s PRINT "■ 

-"5 

1040 

NEXT 


1050 

FOR 1=1 TO 23 


1060 

CURSOR 0,1 : PRINT "| 


1070 

NEXT 


1080 

CURSOR 0,0 * PRINT " r 


1090 

CURSOR 0,24 s PRINT " 

し"； 

1100 

REM - 


1110 

LX=39 : LY=INT(RND(1)*23)+1 

1120 

BX=3S : BY=12 s VX=-1 

: VY=INT(RND(1>*2>»2-1 

1130 

DEF KEY(10)=PQKE ¢952 

，1661 

1140 

POKE ¢952,0 


1150 

CURSOR LX, し Y : PRINT 

•i ド 

1160 

TEMPO 7 


1170 

RETURN 


1180 

REM ========== 


1200 

し B 二し Y : し Y=LY — 1 


1210 

IF し Y<1 THEN し Y=1 


1220 

RETURN 


1290 

REM - 


1300 

し B= し Y s LY« し Y+l 


1310 

IF LY>23 THEN し Y=23 


1320 

RETURN 


1330 

REM arsssassssssss 



朝は目覚ましなしでは起きることは不可能。 

そこで，「明日は目が覚めるまで寝ていよ 
う」と心に決めた日を除いて，毎晚私が打 
ち込むのがリスト5のプログラムです。毎 
晚打ち込むわけですから，早く打ち込める 
ようにと，ムダな飾りはまったく付けてあ 
りません。 

さァ，寝るか。と思い立つと，まず BAS 
1 C を起動します。 MZ -1 Z 001 はテープ版で 
すので，ロードの時間を利用して歯磨きを 
済ませてしまいます。そしてチョコチョコ 
ッと打ち込んで， RUN 。 現在時刻を打ち込 
み，起きたい時刻を入力。画面はクリアさ 
れるので，焼けてしまうといった心配はな 
いでしよう。翌朝，味もそつけもない音で， 



10 INPUT TI$ 

20 INPUT TM$ 

30 PRINT CHR4i(6) ：TEMPQ 7 
40 IF TI*OTM* THEN 40 
50 MUSIC"A1" ： G0T0 50 


見事に目を覚ましてくれます。 

ただひとつ問題なのは，停電するとすベ 
てがパアになってしまうことですが，これ 
は仕方がないでしよう。 

夜も更けてきました。風邪など引かない 
よう，暖かくしてコンピュータとお付き合 
いください。 

おやすみなさい。 












グラフィックで遊びたい 


horiuchi Yasuhide 

堀内保秀 


ハ 0 ソコンによるグラフイックと聞いて， 
皆さんは何を連想するでしょう力、。お絵描 
き？ 高速 3 D グラフィック？ みんなツ 
ールが必要ですし大変そうですね 0 もっと 
簡単にできるグラフィックの遊びはないん 
でしょうか。あります，あります。皆さん 
もやったことがあるでしょう。画面にラン 
ダムに点や線を描いたりしたことが。これ 
にちょっと計算を加えるだけで，おもしろ 
い模様が描けるのをご存じですか。こんな 
遊びこそ，手軽にできるもっともパソコン 
らしいグラフィックの楽しみではないでし 
ょうか0 

III LINE で遊ぶ 

まずはリスト 1- A のプログラムを走らせ 
てみてください。リストは HuBASIC 用で 
すので，ほかの BASIC をお使いの方は各 
自変更してくださいね。 320 ドットモード 
でやる場合は， XM の値を 319 にすれば 0K 
です。 

ただ単に LINE を引いているだけなのに 
模様ができたでしよう 0 パソコンの LINE 
が完全な直線ではなく階段状になっている 
ために，このような模様が描けるんですね c 
STEP のを変えることにより少し感じの 
違った模様になるでしょう。もし，手元に 

リスト 1 -A INLINE で遊ぶ （1) _ 


100 WIDTH 80:INIT:C し S 4 
110 XM=639 

120 FOR X=0 TO XM STEP 4 
130 し INE(X,0>-<XM-X,199) 

140 NEXT 

150 FOR Y=0 TO199 STEP 2 
160 し INE(0,199-Y)-(XM,Y) 

170 NEXT 
180 END 


別の機種があったり，友達が別の機種を持 
っていたら，同じプログラムを走らせてみ 
てください。機種において違った模様にな 
ることがあります。色などを変えていろい 
ろ試してみてください。 

リスト 1- B は卜 A をちよっとだけ変更し 
たものですが，ここでは LINE を引くとき 
に XOR を使っています。 XOR のない人はゴ 
メンしてください。ここで XOR について簡 
単に説明をしておきましよう。 XOR は eXc 
lusive OR (排他的論理和）のことで，この 
場合，引こうとする直線上で，すでに点の打 
ってあるところはその点を消し，点のない 
ところへは点を打つという動作をします（厳 
密に言えばこれを各プレーンごとに行いま 
す)。走らせてみると不思議な模様を描きま 
すね。どうしてこのようになるのでしよう。 
先ほど XOR を指定すると点のあったところ 
の点を消していくと書きましたが，これは 
すなわち LINE が偶数回重なった、部分を消 
していくということですから，まったく重な 
らない部分はそのまま残り，2つ重なった 
部分は消え，3つ重なった部分は残り…… 
というわけで，このような不思議な模様に 
なるんですね。ループに STEP を入れたり 
あるいは色を変えたりして楽しんでみてく 
ださい。 

リスト 1 B || LINE で遊ぶ （2) 


100 WIDTH 80:INIT:C し S 4 

110 XM=639 

120 FOR X=0 TO XM 

130 し INE(X,0 〉 -(XM-X,199),XOR 

140 NEXT 

150 FOR Y=0 TO199 

160 し INE(0,199-Y)-(XM,V) , XOR 

170 NEXT 

180 END 


|| SIN 関数を使って 

次にリスト 2 のプログラムを見てくださ 
い。これはサイン波にノイズ波を入れて歪 
波を合成するものです。ここでノイズ波は 
基本となるサイン波に対する位相（角度の 
ずれ）と周波数の倍率と大きさの3要素で 
決定します。途中 LINE で同じ座標を結ん 
でいるところがあります力 ? ，これは FOR 〜 
NEXT ループ中の LINE 文での始点を設定 
するためのものです。このように LINE 文 
を使うと， PSET を使ってグラフを描いた 
ときのように細切れになることなく素早く 
曲線が描けるのです。 

次はリスト3のプログラムです。さっそ 
く走らせてみましょう。描けた模様に見覚 
えのある人も多いと思います。そう，スピ 
ログラフです。内側に向かって歯のついた 
丸い枠の中にそれより小さな歯車を置いて， 
歯車にあいている小さな穴にペンを入れて 
グルグル回して模様を描くというあれです 
よ0リスト3はそのオモチヤを シミュレ ー 
卜したものです。 R 0 は枠の半径， R 1 は歯 
車の半径， P は歯車の中心からペンまでの 
距離で，現実的に考えるとこの3っの値に 
は R 0> Rl > P の関係が成り立っていなけ 
ればなりません。しかし，何もこの関係を 



LINE 文で描かれた模様 
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満たしていなければならないということは 様が描けることがおわかりいただけたでし 
ありません。むしろ，この閨係を満たさな よう。ほとんどすべての閨数は SIN 関数の 
い数値のほうがおもしろいかもしれません。和として表すことが可能です（フーリエの 


そんな非現実的なことを簡単に再現してく 
れるのがコンピュータのいいところである 
のですから。なお，このプログラムでは各 
変数の値をいっさいチェックしていません 
ので，ただ楕円が描けるだけのときもあり 
ます。めげずにいろいろ試してください。 
また，終了のチェックもしていないので，描 
き終えたと思ったら BREAK してください0 
本来チヱックできることなのですが，プロ 
グラムを簡潔にするためにあえて省きまし 
た。必要なら皆さんで追加して〈ださい。 

リスト2とリスト3では主に SIN 関数し 
か使っていませんが，かなりいろいろな模 


定理)。まだ SIN 問数を習っていない読者の 
方も多いと思います力 5 '，高校へ行って習う 
ことになったら尻込みせずに理解するよう 
にしましようね（実は私もこれにかなり苦 
しめられたのです）。 

I 物体を表示する 

さて次は物理のシミュレーシヨンです。 

「数学の次は物理か……」といってため息 
をつくことはありません。計算するのはあ 
なたではなく目の前のコンピュータなので 
すから0リスト4のプログラムはある高さ 
から投げ出されたボールが床や壁に衝突し 


て跳ね返される様子を再現します。 G は重 
力加速度で，地球上では約9.8，月面では 
地球上の約6分の1の値になる物理定数。 

E は跳ね返り係数と呼ばれるもので OSE 
‘1の値をとります。 V 0 は初速度， Y 0 は投 
げ出される高さ， D は投げ出す角度で一90° 
S D $90°の値をとり，値が正のときは上向 
き，負のときは下向きに投げ出されること 
を意味します。 SP は何秒おきに状態を画面 
に表示するかを表しますが，衝突の瞬間を 
表示するために必ずしも SP 秒ごとのもの 
が描かれるとは限りません。 AT を0以外の 
数にするとボールの軌跡が表示され，スト 
ロボ写真のようになります。 

ちよつと難しかったかもしれませんが， 
変数の値をいろいろ変えてやってみてくだ 


リスト 2 || サイン波合成 _ 

100 WIDTH 80:INIT:C し S 4 
110 XM=639 
120 SP=2 

130 REM - 

140 RH=30 : REM PH=^V9 

150 FR=3 : REM FR=A" ィ…リ 

160 し V=50 : REM しソ=オオ中サ <_/• テ * 7 ラ 9 ス） 

170 REM - 

180 Y0=99 
190 YG=60 

200 し INE(0,Y0 〉 -<XM,Y0 〉 

210 REM - 

220 DEF FNY1<X 〉 =SIN(X 本 九 /180 〉 本 YG 

230 DEF FNY2<X>=SIN(FR 本 （ X+PH 〉 本 rt/180 〉 本 YG 本し V/100 
240 REM - 

250 Y=Y0-FNY1 ¢0): し INE(0,Y>-<0,Y 〉， PSET,5 
260 FOR X=0 TO XM STEP BP 
270 Y=FNV1(X) 

280 し INE-(X,Y0-Y 〉 ,PSET,5 

290 NEXT 

300 REM - - 

310 Y=Y0-FNV2(0) :し INE<0,Y 〉 -(0,Y>,PSET,2 
320 FOR X=0 TO XM STEP SP 
330 Y=FNV2(X) 

340 し INE-<X,Y0-Y>,PSET,2 

350 NEXT 

360 REM - 

370 Y=Y0-(FNY1 (0)+FNY2<0) 〉： し INE <0, Y> - <0, Y> , PSET, 
380 FOR X=0 TO XM STEP SP 

390 し INE-(X,Y0-(FNY1(X)+FNY2(X))),PSET,6 

400 NEXT 
410 END 


■ J スト 3 || スピログラフ _ 

100 WIDTH 80:INITsC し S 4 
110 XM=639 : XC=INT(XM/2) 

120 REM - 

130 R0=200 s Rl=160 s P=125 s R=R0-R1 s YG=.5 

140 REM - 

150 SP=4 

160 REM - 

170 し INE(XC+R - P,99>-(XC+R-P,99 〉 jPSETjG 
180 FOR 1=0 TO1 STEP 0:D=D+SP 
190 S1=D 本 rt/lB0:S0=Si 本 R1/R0 

200 X=R 本 COS(S0) 一 P 本 COS(SI)sV=R*SIN(S0)+P*SIN(S1) 

210 し INE-<XC+X,99+Y 本 YG 〉 

220 NEXT 
230 END 


さい。 

リスト 5 のプログラムは立体形を表示す 
るものです0とはいっても立体テレビなる 
ものがあるわけではないので，当然 3 D — 
2 D 変換をして平面上に表すことになります。 
まず座標の変換です.が，3次元上での座標 
を （ X ， Y , Z ), 2次元上での座標を （ U ， V ) 
として次のようにします。 

U = X-Y 
V = X + Y/Z + Z 

本来もう少し複雑なのですが簡略化のため 
にこうしておきます。次に隠線处理（裏に 
隠れて見えなくなるべき線を消すこと）で 
す。このプログラムでは図形を前面から後 
面に向かって表示しているので，各縦線上 
で新しく計算した V の値がそれまでに表示 
していた点の V の値の最大値と最小値の間 
にある場合は，その新しい点が後ろ側の点 
であるとして，それを表示しないようにし 
てあります。ちょっと難しかったかな？ 
これを実現するため， T ( U ) にそれまでの 
最大値， B ( U ) に最小値をそれぞれ記録し 
ています。 

表示する関数は DEF FNZ ( X ， Y ) で定 
義しています。ここを書き換えることによ 
ってさまざまな図形が描けるはずです。要 
は X と Y の式になっていればいいのですが， 
画面からはみ出してしまうことも考えられ 
るので注意してください。 

なお，プログラム中に出て〈る変数 S P 
は計算するステツプ値で，この値を大きく 
すると実行速度が速くなります。しかし， 
大きくしすぎると絵が雑になり，何を描い 
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特集 BASIC “行動学”入門 


リスト4 弾むボール 


■■ 100 

WIDTH 80:INIT:C し S 4 


110 

XM=639 : XR=XM-10 


120 

REM - 


130 

G=9.8 : E=.7 


140 

REM - 


150 

SP=.2 : AT=0 


160 

REM - 


170 

V0=60 : Y0=100 : D=45 


1S6 

REM - 


190 

DEF FNT(V,V)=(V+SQR(V*V+2*G*Y))/G:DEF FNY(V,Y,T)=V*T-.5*G*T*T+Y 

200 

DEF FNT1(V,Y) = (V — SdR <V 本本 G 本 Y〉>/G 


210 

S=D 本： ^/180: ソ丫 0= リ 0 本 511\1(5) : VX0=V0 本 CDS(S 〉 


220 

VY=VY0sVX=VX0:X0=10 


230 

T=-SP 


240 

REM - 


250 

FOR 1=0 TO1 STEP 0 


260 

T=T+SP 


270 

X=VX 本 T+X0s Y=W 本 T_« 5*G 本 T 本 T+Y0 


280 

REM ######### シ 3 ウトツ i/a リ 林 ##### 林 # 林 # 


290 

REM —ユカ ーーーー 


300 

IF Y>=10 THEN 340 


310 

T=FNT(VY,Y0) : X=VX*T+X0s Y=10:C=(C+l)MOD 7 


320 

VY=-(VY-G*T)*EsY0=10sX0=X:T=0:GOTO 460 


330 

REM - 7)^ ( = =T 〉 - 


340 

IF X=<XR THEN 380 


350 

T=T-(X~XM)/VX:X=XR:Y=FNY(VY,Y0,T)sC=(C+1) MOD 

7 

360 

VX=-VX*E:X0=XRz VY=VY_G 本 Ts T=0r Y0=Ys GOTO 460 


370 

REM -( ヒヲ ~ V 〉 - 


380 

IF X>=10 THEN 420 


390 

T=T+X/VX: : X=10sY=FNY(VY,Y0,T) : C=(C+1) MOD 7 


400 

VX= — VX 本 Es X0=10:VY=VY-G*T:T=0;Y0=Y:GOTO 460 


410 

REM -- テンシ*ヨウ - 


420 

IF Y=<189 THEN 460 


430 

T=FNT1(VY,Y0-1B9):X=VX 本 T+X0:Y=189:C=(C+l 〉 MOD 

7 

440 

VY ニー （ V/Y — G 本 T> 本 Es Y0=18 <? ミ X0=X: T=0s GOTO 460 


450 

REM - 


460 

CIRC し E<X,199-Y),5,C+l 


470 

IF AT=0 THEN C し S 0 


480 

NEXT 


490 

END 



リスト6 |真円チェック 


100 WIDTH B0:INIT:C し S 4 
110 XM=639 
120 YG=.5 

130 FOR D=0 TO 360 STEP 5 
135 S=D 本 rt/180 
140 X=COS(S) 拿 50s Y=SIN(S)*50 
150 PSET(X+XM/2,Y*YG+99) 

160 NEXT 
170 END 


ているのかわからなくなりますので適当に 
調節しましょう。また， YG は画面の縦と横 
の比が1対1になっていないことからくる 
歪みを補正するためのものです。リスト6 
のプログラムを走らせて真円が表示される 
ように， YG の値を設定してください。 


以上 BASIC で簡単にできるグラフイツ 
クのプログラムをいくつか紹介しました。 
これほど短いものでもかなりのことができ 


リスト5 II 3次元グラフ 


100 

WIDTH 80:INIT:C し S 4 

110 

XM=639 

120 

DIM T(XM),B(XM) 

130 

FOR 1=0 TO XM 

140 

T<I>=-1:B(I 〉 =199: し OCATE 0,0:PRINT XM-I 

150 

NEXT 

160 

REM - 

170 

C し S 

180 

DEF FNZ (X, Y) =30 本 COS (rt 本 X/20) 本 SIN 本 Y/20) 

190 

SP=1 

200 

REM - 

210 

FOR Y=0 TO 80 STEP SP 

220 

FOR X=0 TO XM/4 STEP SP 

230 

Z=FNZ(X,Y) 

240 

P=X-Y 

250 

U=XM/ 319 本 P+XM/2 

260 

Q*Z+X+Y/2 

270 

V=190-Q 

280 

IF U<0 OR U>XM THEN 370 

290 

IF V<0 OR V>199 THEN 370 

300 

IF V>B(U) AND V く T(U> THEN 370 

310 

IF V<B<U) THEN B(U)=V 

320 

IF V>T(U) THEN T(U)=V 

330 

C=6 

340 

IF Z<0 THEN C=5 

350 

IF Z>0 THEN C=7 

360 

PSET(U,V,C) 

370 

NEXT 

380 

NEXT 

390 

END 


かし，これはまだほんの入口にすぎません。クじやない！皆さんのアイデアと工夫で 


パソコングラフィックの世界はもっと奥が 大いに“シンプルグラフイツク”を楽しん 


るのがわかっていただけたと思います。し 


深いのです。お絵描きばかりがグラフイツ 


て'{ださい。 
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II 正しいベンチマークテスト 

パソコン_誌ではリスト 1- A のようなべ 
ンチ マーク テストをよく見かけます。この 
ようなスピードテストの目的は何でしよう。 

もっともよくあるパターンは“マシン/ 
BASIC の比較”であり読者の多くもこれを 
望んでいるようです。しかし，ベンチマーク 
テストの結果はマシンの性能のすべてでは 
ありません。「そんなことわかってい る」 と 
いう人もたくさんいるでしよう力 5 '， BASIC 
の，それも一部のコマンドのスピードだけ 
を気にする人がいるのもまた事実です。確 
かにマシンの性能は BASIC のスピードに 
十分反映されますが，同じ性能であれば， 
メモリを使えば使うほど，命令数を少なく 
するほど，自由度を小さくすればするほど 
BASIC のスピードは速くしやすいのです 
(かといって速い BASIC がユーザー フレ 
ンドリーでないというわけではありません）。 
また，出てくる数字は FOR 〜 NEXT の単純 
ループの値を引いていないのが普通ですか 
ら，その数字すらも本当の意味では間違っ 


ています。ましてや，それぞれのベンチマ 
ークテストの合計を出したりするのはいた 
だけません。我々は数字で示される事実に 
弱いだけに注意する必要があるようです。 

さて，ベンチマークテストのもうひとつ 
の目的0それは「命令やサブルーチンのス 
ピード比較」です。これは雑誌ではあまり 
お目にかかれませんが， ユーザー レベルで 
はかなり頻繁に行われていることだと思い 
ます。プログラムというものは，目的はひ 
とつであってもいろいろなアルゴリズム， 
ルーチンが考えられるものです。その中で 
スピードが重要である場合，ベンチマーク 
テストは欠かせません。 

私も BASIC を習いたての頃，マシン語な 
どというものには目もくれず，ひたすら B 
ASIC で最適化を図ろうと頑張っていまし 
た。マシン語を勉強したのはもう少しあと 
のことなのですが，それもマシン語のスピ 
ードに魅力があったからではなく，純粋な 
知的関心からであったため，それからも B 
ASIC プログラムのスピードアップには取り 
組み続けていました。 


そんなわけで，何かアイデアや疑問がわ 
くたびにベンチマークテストを繰り返して 
いたのです力 ? ，ある日 XI HuBASIC を使っ 
ていておかしなことに気付きました。同じ 
プログラムを走らせても出てくる結果が違 
うのです。それがどんなプログラムであっ 
たかは覚えていませんが，そこで私が推理 
して得た結論は次のようなものです。 

1) XI の内蔵タイマーは1個しかない。 

2) TIME の値を書き換えても TIME $ の値 
は変わらない。 

3) 1)， 2) より 「 TIME = nj を実行すると 
タイマーの値と n の値が記憶される。 

4) TIME を読み出すときは，そのときの 
タイ マーの 値と記憶されているタイ マー 
の値， n の値から計算して求められる。 

これが正しいとすれば，同じ処理時間でも 
1秒の誤差（図 1), 同じ表示時間でも2秒 
近い実際の時間差があることになります（図 
2)。その後，特に調べてはいませんがたぶ 
ん正しいのではないかと考えています（ご 
存じの方がいたら教えてください)。 

そのときから自分用のプログラムはリス 


リスト 1-A ||よくあるベンチマークプログラム 


10 

’ 初期設 

定 



20 

TIME=0 



TI$=* 00000 0* 

30 

FOR 1=1 TO 

回数 



40 

’ 処理内 

容 



50 

NEXT 




60 

PRINT TIME 


1 (S) 

PRINT TI$ 


図 1 || 実行時間と表示タイム （1) 

r - A 


内葳タイマー -4 1 Al *-, "I > い ■ ，十 - 

U - B -^ 

I | 

同じ実行時 閜 だが，表示タイムは A のほうが 1 秒多い 


リストト B 改良したベンチマークプログラム 


10 

-n - 

’初期設定 



20 

TIIIE = 0 

’⑻ 

TU=. 00000 O' 

30 

IP TIHE=0 THEN 30 

’ ⑻ 

IF TI$=' 00000 0 B THEN 30 

40 

FOR 1=1 TO 回数 



50 

’ 処理内容 



60 

NEXT 



70 

PRINT TIME-1 

’⑻ 

PRINT VAL(RIGHT$(TI$) f 2)-1 


図 2 I 

| 実行時間と表示タイム （2) 


1 

II "" 

1 

A r] 


1 

1 

i 

1 4 * l 


円/タイマ ” ■产 1 

n 


1 _ 

同じ表示タイムだが， 

実行時間は A のほうが 2 秒近く長い 
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トト B のように改めたのはいうまでもありま 
せん0ループの時間も加わりますが，サブ 
ルーチンなどの速度比較に使うだけですか 
らこれでよいのです。なお，命令やサブ ル 
ーチンの純粋な処理時間を調べるときは F 
OR 〜 NEXT の単純ループの時間を引いてリ 
スト 1- C のようにします。 


||変数の魔術師 


BASIC プログラムの最適化のためにやっ 
ていたベンチマークテストも，前述の TIM 
E 変数のように BASIC の中身を探る手段と 
して使われることがしばしばでした。スピ 
—ドチェックを目的に始めたテストでも， 
途中でおもしろい発見があるとそちらのほ 
うに没頭してしまったものです。中でもい 
ちばん印象に残っているのは「変数とスピ 
ード」に関する実験です。 

私はある日何の根拠もなしに，変数は A 
〜 Z の順に速いのではないかというとんで 
もない仮説を立てました。予備実験で，そ 
の差はあってもほんのわずかであることが 
わかっていたので，相当長い時間計らない 
と差が出ません。メモリダンプを見て BAS 
1 C のテキストがどのへんに格納されている 
か知っていました。そこで， A から乙まで 
変数名を POKE 文で書き換えながら走ると 
いう恐ろしいプログラム（リスト 2) を考 
えついて ベンチマーク テストをしたので 
す。 

結果は期待どおり，見事に A 〜 Z の順に 
なりました。しかし，はっきりと差が出過 
ぎている。変だと思い，今度は Z から A の 
順に変数名を書き換えるようにして再テス 
卜しました。結果は Z 〜 A の順です。 

ここで新しい仮説が浮かびました。変数 
は使い始めた順に速いというものです。考 
えてみれば，リスト2のプログラムでは G 
0 T 0 でループしても変数はクリアされない 
ので，変数 B は2番目， Z は26番目に使わ 
リストト C || 時間 計測 用ベンチマークプログラム 


.れた変数であるということになり，再テス 
卜の結果でもつじつまが合います。確認の 
ためリス ト 3- A のような プログラムを 作っ 
ていろいろ実験してみました。当然のこと 
ながら変数の格納状況も調べたくなるので 
メモリダンプしてみると， BASIC テキスト 
のちょっと後ろに変数名が使った順番に入 
っています。これですベて納得がいきまし 
た。 BASIC は変数を使うたびにこのテープ 
ルの頭から参照し，未使用の変数名ならテ 
ーブルの最後に追加していくのです。リス 
卜 3- A の50行を「50 Z = Z + 1」とすれば 
26番目に使われた変数の速さがわかります。 

A と Z の差は25個分の差ということになり 
ますから，時間差を25で割れば1個分の差 
をかなり正確に知ることができます。この 
差は BASIC によってかなり異なっていて， 
HuBASIC は差が大きく出るようです。 

さて，ここでもうひとつ仮説が浮かびま 
す。2文字変数より1文字変数のほうが速 
いと考えるのが普通ですが，変数名の参照 
の仕組みによっては，2文字変数のほうが 
1文字変数より速いこともあるのではない 
かということです。 S - BASIC ではすベて 
の変数が2文字で扱われているので基本的 
に関係ありませんが，なかなか興味深い話 
なので S - BASIC を使っている方も読んで 
ください。 

リスト 3- A をリスト 3- B のように変更 
して試してみましよう。 HuBASIC では変数 
Z より速くなるはずです。このことから考 
えて， HuBASIC では変数名をチェックす 
る前に変数名の字数をチェックしていると 
推定できます。変数 Z の場合 A から Y まで 
字数と変数名の両方をチェックしてパスす 
るのに対して ， A A の場合 A から Z まで字 
数をチェックするだけで済むのでそれだけ . 
速くなるのです。3文字以上の変数名を使 
った場合も同様のことがいえます 。 HuBAS 
1 C では1変数に対して「型」，「字数」，「変数 

リス ト2 


10 

' 初期設定 




20 

TIHE=0 

’⑻ 

TI$=. 0000001 

30 

IF TIHE=0 THEN 30 

’⑻ 

IF 

TI$=' 0000001 THEN 30 

32 

FOR 1=1 TO 回数 




34 

NEXT 




36 

T0=TIHE:TIME=0 

’⑻ 

TO: 

=VAL{RIGHTS(TI$), 2):T1$=* 00000 O' 

38 

IF TIHE=0 THEN 38 

' (S) 

IF 

TIS=' 000000 • THEN 38 

40 

FOR 1=1 TO 回数 




50 

’ 処理内容 




60 

NEXT 




70 

PRINT TIHE-T0 

’⑻ 

PRINT VAL(RIGHT$(TI$), 2)-T0 


特集 BASIC “行動学”入門 

名」の順に格納されているので，おそらく 
この順番にチェックされるのでしよう。 

以上の研究成果が BASIC プログラムの最 
適化におおいに役立ったことはいうまでも 
ありません。 


II 関係演算と IF 文 


BASIC でダイレクトに， 

A =2 : B =2 : PRINT A=B 
とやってみてください。「一1」と表示され 
たでしよう。今ではすっかり当たり前とな 
り， BASIC のマニュアルにもきちんと表記 
されるようになった関係演算です力す，私が 
MZ - 2000で BASIC を習い始めた頃はまだ 
ポピュラーではありませんでしたので，偶 
然このようなタイプミスをして「一1」と表 
示されたときは不思議に思いました。 

算術演算というのは+，一，*ノ，へなどの 
算術演算子を用いて演算を行うもので， 

C = A + B 

とすれば， A + B という算術式の値が C に 
代入されます。同様に，関係演算は等号， 

リスト 3-A 1| 変数と速度 （ 1) 


4 


B=0 


P = 0 
W=0 


c=o 

J = 0 
Q=0 
X=0 


D=0 
K = 0 
R=0 
Y=0 


10 A=0 
12 H = 0 
14 0=0 
16 V=0 
20 TIHE=0 

30 IF TIME=0 THEN 30 
40 FOR 11=1 TO 30000 
50 A=A+1 
60 NEXT 

70 PRINT TIME-1 


E = 0 
L=0 
S=0 
Z = 0 


F = 0 
M=0 
T=0 


G=0 
N = 0 
U=0 


リスト 3-B | 

II 変数と速度 (2) 


10 

n 

A=0 

「 

:B = 0 

: C=0 : D=0:E=0 : F=0 

G=0 

12 

H = 0 

: 1=0 

: J = 0:K = 0:L = 0:M=0 

N = 0 

14 

0=0 

: P=0 

: Q=0 : R=0 : S=0 : T=0 

U = 0 

16 

V=0 

: w=o 

: X=0:Y=0:Z=0:AA=i 

0 

20 

TIME=0 



30 

IF 

TIME=0 THEN 30 


40 

FOR 

I 1 = 

1 TO 30000 


50 

AA=AA+1 



60 

NEXT 



70 

PRINT TIME-1 



変数速度実験 


10 CH=65 

15 * POKE ??,CHrPOKE ???,CH 
20 TIHE=0 

30 IF TIME=0 THEN 30 

40 FOR 11=1 TO 100:FOR JJ=1 TO 10000 

50 A=A 

60 NEXT:NEXT 

70 PRINT CHR$(CH) ;* : , ;TIIIE;* B ; 

80 CH=CH+1:IF CH= く 90 THEN 15 
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不等号の関係演算子（比較演算子）を用い 
て演算を行います。たとえば， 

C = (A = B ) 

というのは ， A = B という閨係式の値を C に 
代入するものです。関係式の値は，その式 
が成り立つとき（真のとき） 一 1，成り立 
たないとき（偽のとき）0になりますので， 
上の例では A と B が等しければ C = — 1，等 
しくなければ C = 0になるわけです。 

とすれば 

IF A=B THEN 〜 

のようになって いる IF 文の中身はどうな 
っているのでしよう。 BASIC マニュアルで 
は， 

IF ® THEN ⑬ ( ELSE ©〉 

は，©が成り立てば⑬，成り立たなければ 
©を実行すると書いてありますが，内部処 
理としては「成り立つ」，「成り立たない」な 
どの抽象的な表現ではなく，必ず数値で判 
断しているはずですね。そこで出てくるの 
がさっきの関係演算です。 

IF ( X =< 0) + ( X > 9) THEN 〜 
IF ( Y > 0)* ( Y =< 9) THEN 〜 

を考えると，上の関係式は，両方成り立て 
ば（一1)+ (—1)=— 2，一■方が成りたて 
ば一1，両方成り立たなければ0になり ， T 
HEN 以降が実行されるのは一2, — 1のとき 
です。下の式では，両方成り立てば（一1 )X 
( — 1)=1，少なくとも一方が成り立たなけ 
れば〇になり， THEN 以降が実行されるの 
は1のときです。ということは， 

IF @ THEN ⑬ (ELSE ©) 
というのは， 「® の値が0以外であれば⑬， 

0であれば©を実行する」と言い換えたほ 


うが明快ですね。これを使えば， 

IF ZOO THEN 〜 

というのは， 

IF Z THEN 〜 

としたほうが余計な演算がないぶん実行速 
度も上がるわけです。 

IF ( X >0) * ( X <9) + ( Z = 1 ) THEN 〜 
は「 X が0より大きく 9より小さいか，ま 
たは Z が1ならば〜」という意味ですが， 
このとおりやってしまうと両方が成り立つ 
とき式の値は0になり，思わぬバグの原因 
になったりします。皆さんもこのような経 
験をしたことがあるのではないでしよう力、。 
この場合は 

IF ( X <0) * ( X <9)-( Z = 1 ) THEN 〜 

としなければいけないのです。 AND や OR 
などの論理演算が使える BASIC では，この 
ようなことはありません。 

さて，問係演算の意味が理解でき，カー 
ソルの移動チェツクなどで ， 「K =1でかつ 
X >0 ならば X=X — 1， K =3 でかつ X <39 
ならば X = X +1」 という意味で， 

X = X - ( K = l )* ( X >0) + ( K =3 )*(X 
<39) 

などと得意げにしていたのですが，あると 
き雑誌で 「 IF 文を使うより関係演算を使っ 
たほうが速い」と書いてあったのを見て， 
あまのじゃくな私は「本当だろうか」とい 
う疑問にぶつかったのです。 

さっそく，リスト 4- A ， B のようなプログ 
ラムを作って試してみました。10行の尺に 
0,1,3を入れてそれぞれ試してみてくだ 
さい。確かに関係演算を使ったほうがすっ 
きり書けますが，スピードは必ずしもそう 


ではなく，むしろ IF 文を使うほうが速いよ 
うです。 MZ - 2000の S - BASIC では ELSE 
が使えませんのでリスト 4- C のようにな 
るのですが，それでも IF 文を使ったほう 
が1割ほど速かったのです。私は一般に関 
係演算を使うほうが IF 文よりも遅いとい 
う結論に達し，以後スピードが問題になる 
ときは必ずチェックして使うようにしまし 
た。 

この差は BASIC によって異なり，またア 
ルゴリズムによっては関係演算を使ったほ 
うがいい場合もありますので，皆さんそれ 
ぞれチェックして使いましょう。なお ， A 
ND ， OR が使えるものは，リスト 4- D のよ 
うに IF 文中ではこちらを使ったほうが+， 
* を使うよりも速くなります。 

HI BASIC 探検の楽しみ 

こんな感じで，私はベンチマークテスト 
とともに BASIC の^^を楽しんできました< 
もちろん中心はプログラム作りであったわ 
けですが， BASIC へのこのような知的関心 
はプログラミングの大きな刺激剤であった 
のです。 

皆さんが日頃 BASIC を使っていて気付 
いたちょっとした疑問は，大部分はマシン 
語の知識，ハードの知識がなくとも理解で 
きる，少なくとも推測はできるものです。 
そういった疑問を疑問のままに終わらせな 
いこと，できる限り自分の力で解決するこ 
とが大切なのではないでしょう力、。プログ 
ラムを作るにしろ，中身を探るにしろ ， B 
ASIC そのものがアドベンチヤーなのです 
から。 


リスト 4 -A ||関係演算を使った場合 リスト 4 -B || IF 文を使った場合 (1) 


rr 


n 

10 X=20:K=0 


10 X=20:K=0 

20 TIHE=0 


20 TIME=0 

30 IF TIHE=0 THEN 30 


30 IF TIIIE = 0 THEN 30 

40 FOR 1=1 TO 5000 


40 FOR 1=1 TO 5000 

50 X=X-{K=1)*(X>0)+{K=3)*(X=<39) 


50 IF (K = 1)*(X>0) THEN X=X-1 ELSE IF (K = 3)♦ (X=<39) THEN X=X 十 1 

60 NEXT 


60 NEXT 

70 PRINT TIME-1 


70 PRINT TIME-1 


リスト 4 -C || IF 文を使った場合 (2) リスト 4 -D || IF 文を使った場合 (3) 


n 

10 X=20:K=0 


n 

10 X=20:K=0 

20 TIHE=0 


20 TIME=0 

30 IF TIHE=0 THEN 30 


30 IF TIHE = 0 THEN 3,0 

40 FOR 1=1 TO 5000 


40 FOR 1=1 TO 5000 

50 IF (K = l)* (X>0) THEN X=X-1:G0T0 60 


50 IF K=1 AND X>0 THEN X=X-1 ELSE IF K=3 AND X= く 39 THEN X=X+1 

55 IF (K=3)*(X=<39) THEN X=X+1 


60 NEXT 

60 NEXT 


70 PRINT TIME-1 

70 PRINT TIHE-1 




50 Oh! MZ 1986.1. 











へのインタフェイス 


Kuwano Masahiko 

桊野雅彦 


さて困ったことになりました。特集の内 
容が BASIC 。 そこに私も参加せよとの命が 
下ってしまったのです。どうしよう。 

困ってしまったのには訳があります。私 
がマイコンを扱い始めたきっかけというの 
が，そもそもアマチュア無線仲間とのおし 
ゃべりだったのです。 

「そういえば，何でもマイ クロコン ピュー 
夕と力、いうのがあるらしいな」 

「ああ，なんかアキバッパラに時々ある， 
あのでっかい 1 C だろ」 

「うん，ちっこくても一応コンピュータら 
しい」 

「ふ一ん。いっちよ，作ってみっか。ここ 
んとこ作りたいもんもないし，どうせコン 
ピュータなんて1と〇しかないんだから単 
純なもんだ」 

「ああ，俺も少し調べたんだけど，マッチ 
ングも取らなくていいし，全部ワイヤ配線 
でいいみたいだしな」 

「つなぐだけ！？それじゃブラモといっし 
よじゃん。それでも電気回路かよ」 

「俺だって良く知らないけど，それでいい 
ってことみたいなんだ」 

「何でえ，単純じゃん。いっちよやってみ 
っか」と，まあ今考えれば，何とも easy で 
light な感党で作り始めたのです。こんなと 
ころが出発点ですから，どうしてもハード 
ウェア寄りの思考になってしまいます。ラ 
ジオや無線機を自分で設計して，部品を集 
め，組み立て，調整することとまったく同 
じ感覚でマイコンを組み立てたのですから， 
私にとってマイコンとは「メモリの内容に 
従って，デジタル入力信号を加工して出力 
するもの」，つまり非常にフレキシブルな論 
理回路であるということだけのものだった 
のです。 

ですから，マイコンを使って何かを制御 


しようという，手段として見ることがほと 
んどで，マイコンそのものを目的物として 
捕らえることはまずありませんでした。 

マイ コンはあくまでコントローラである 
としか見ていなかったのですから。要求さ 
れるプログラムというのも単純なもので， 
どう頑張ったとしても256 バイ トを越える 
ことはまずありませんでした。この程度の 
ものでは，ハンドアセンブルでも何とかな 
りますし，何も巨大な BASIC をロードす 
る必要もないのです。さらにその後，本誌 
に発表された TTL インタプリタの前身であ 
る， GAME インタプリタとコンパイラが手 
に入ってからというもの，ほとんどのプロ 
グラムは GAME とアセンブラ （ i 8080表記ば 
かり使っていた）で組んでいました。 

変数は26個もあるし，四則演算やメモリ 
アクセスも簡単にできるうえ，インタプリ 
夕が約 1.5 K バイトと，かなりコンパクトで 
あったことが， GAME を使った理由でした。 

特に MZ -80 K のように，カセットテープ 
からロードしない限り，メモリダンプすら 
できないようなマイコンでは，何か事が起 
こる（人はそれを暴走と言う）たびにシステ 
ムからロードし直しになるのですから，大 
きさ （= ロード時問）は大切でした。 

私にとっては，実数演算や文字列処理な 
どは不要でしたし， BASIC では16進も満足 
に扱えない （ SP - 5030に至って，ようやく 
PEEK , POKE のアドレスに16進数が使え 
るようになった）のですから，私のニーズ 
にはまったく合っていなかったのです。一 
応 BASIC の記法くらいは雑誌等で眺めて 
覚えていたので，ブラックジャックなどの 
ゲーム，一筆書きのパズルなどを解かせて 
みたり，そしてまたある時は無理数を数百 
桁求めてみたりと，いろいろやってはみた 
のですが，やはりあまり本筋という感.じで 


はありませんでした。どちらかと言えば， 
BASIC しか動かせない世間一般のマイコン 
への移植を考えなければならないときや， 
「情報処理」とやらの宿題をたのまれたと 
きが主体となっていました。 

| BASIC の基本を考える 

それでは，その当時私が作ったプログラ 
ムのうち，平方根を求めるもの（リスト1 ) 
と，一筆書きの解を求めるもの（リスト 2) 
を紹介しましょう。前者は， BASIC の桁数 
の限界 （ HuBASIC でも16桁）を超える精 
度が欲しいときに，後者は，この手のパズ 
ルをコンピュータで解かせるときの基本で 
ある，パ、ックトラッキングの例として，ち 
ょっ とつつ いてみるには 良い題材 だと 思い 
ます。アルゴリズム上でも，まだまだ高速 
化の道はあると思いますので，元気な人は 
試してみてはいかが？ 

1) 平方根を求める 

平方根に限らず，関数の微分さえできれ 
ば答が求められるニュートン法や，原始的 
に力づくでまともに計算していく方法など， 
いろいろな道がありますが，ここでは理屈 
を無視して，やり方だけよく知られている 
という，開平法と称する（らしい）方法で 
解かせてみることにしました。 

開平法は，四則演算ができれば良いうえ， 
比較的楽に精度が出せるので，平方根を手 
計算で求める方法として，参考書等でもよ 
く見かけるようです。 

今回は，この手計算の部分を MZ にやら 
せてみたのですが，多桁の演算をサブルー 
チン化したため配列のコピー等で手間を食 
ってしまい，速度の点では今ひとつもの足 
りません。100桁や200桁もの精度を要求す 
ると画期的に遅くなりますが，勉強用と割 
り切って大目に見てやってください。 
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2) 一筆書きを解く 

いまさら説明するまでもない，大古の昔 
から有名なパズルです。今回はこの古典的 
なパズルを MZ に解かせてみました。とに 
かく，基本的にというか泥くさくというこ 
とを考 i ， 「奇点(線が奇数本集まっている 
点）が 3 つ以上なら不可能， 2 つ以下なら， 
そこが始点」といった初歩的な知識も使い 
ませんでした。 

走らせると，点の数と，それぞれの点の 
間を結ぶ線の数を聞いてきますので，順次 
入力してください。 

例に挙げたようなものならば，点の数は 
4， 線の データは1，1，1，2，0，2 
と入力します。 

入力が終わると MZ が解くために使う表 
(点の間の道の本数の表）と，道の総本数 
を表示してから解きにかかります。 

解いている間，何も表示させないほうが速 
くなるのは当然ですが，見ていてまったく 
面白くないので，たどっている経路を表示 
させるようにしました。行きつ戻りつ，角羊 
を兄つけようとしている姿がわかることで 
しよラ0 

例題は答がないので少々かわいそうな気 
もします0延々とルートを探したあとで 
「impossible (不可能)」という叫びをあげま 
すので，今度は，②と④の間に道を通して 
あげましよう。 

| BASIC を利用する 

さて，このような具合で BASIC とは，あ 
まりつきあっていなかった私ですが，実数 
やプロツタを扱うことになって ハタ と気が 
付いたのは， BASIC が数値計算や周辺機器 
の インタフェイス としても利月 J でき る こと 
です。 


BASIC を上手にだましてやることで，ア 
センブラで書いたサブルーチンと周辺機器 
の間をとりもたせることができることに気 
付いてから，わりと BASIC をよく使うよ 
うになりました。 

このような使い方で特によく利用したの 
が BASIC の配列変数です。整数の配列を宣 
言すると， BASIC がその分だけメモリを開 
放してくれるうえ，中身を読み書きする場 
合に，わずらわしい PEEK や POKE を使わ 
V， A ( I )といった具合にできてしまうとい 
うのが好ましかったのです。 

配列に限らず， BASIC における変数の宣 
言は，メモリを確保し，そこに名前を付け 
ることだと考え直してみれば，よくわかる 
でしよう0アセンブラで書いたルーチンと 
の間で，変数名を使ったメモリを渡してデー 
夕の受渡しを行い，ファイルアクセスや数値 
計算，表示等は BASIC にまかせることで， 
処理速度を落とさずに短期間で動くプログ 


ラムにすることができるのです。 

これがさらに進むと， BASIC の管理して 
いるポインタをこつそり書き換えて……と 
なるのです力 ? ， BASIC のバージョンの違い 
などであっさり動かなくなってしまうので 
私も最近はほとんど行いません。 

このように，機械語と BASIC の間のデー 
夕引渡しの例として，メモリダンプ•プロ 
グラムを紹介しましよう。 MZ -1500 の BA 
SIC では，マイクロソフト系の BASIC には 
ほとんど付いている VARPTR (変数の格納 
されるアドレスを返す）という関数がない 
のですが，幸い， USR 関数実行時に文字変 
数のアドレスをひとつだけ渡せるので，こ 
れを利用します。 

文字変数の配列を確保して，中にスペー 
スをつめ込んでおきます。機械語 ルーチン 
では， このスペースの 部分を ダンプ リスト 
に書き換えます。 BASIC は， USR から帰っ 
てきた時点で配列の中身を PRINT します。 


リスト1||平方根 


1000 INPUT" ケヴスウ ，、*? M ； KETA ： MAX=INT(KETA/3) 

1010 DIM MAIN(MAX),SUB<MAX),B0(MAX),B1(MAX),A(MAX),B(MAX) 
1020 FOR 1*0 TO MAX 

1030 MAIN(I>»OxMAIN<I>=OsSUB<I>=OsBO(I)=0 
1040 NEXT I 

1050 INPUT “ f'-J A ? M ； MAIN(0) 

1060 " - 

1070 FOR I»0 TO MAXsBO(I)-Os NEXT 
1000 CO-1 

1090 FOR 1=0 TO MAX ： B(I)=SUB(I)：NEXT 
1100 ZZ»10 拿 COtGOSUB"MU し T M 
1110 ZZ»CO 拿 CO:GOSUB"ADDS.. 

1120 FOR I«0 TO MAXiA(I)=MAIN<I)*NEXT 
1130 SOSUB-CMP" 

1140 IF Z2>0 THEN 1180 

1150 FOR I»0 TO MAX ： BO(I)»B<I)sNEXT 

1160 CO-CO-HiIF C0>100 THEN END 

1170 GOTO 1090 

1180 CO-CO-1 

1190 FOR 1-0 TO MAXiBd)»MAIN<I)sA(I)=BO(I)：NEXT 
1200 QOSUB M SUB" 

1210 ZZ=100sG0SUB..MU し T M 
1220 J=0 

1230 FOR 1-0 TO MAX»MAIN<I)»B(I) ： J»J OR (MAIN(I)>0)»NEXT 

1240 PRINT CO?*IF J=0 THEN END 

1250 FOR 1=0 TO MAX*B<I)«SUB(I)sNEXT 

1260 Z Z »10 * GOSUB M MULT M 

1270 ZZ=2 拿 C0*60SUB M ADDS" 

1280 FOR 1-0 TO MAX ： SUB(I)»B(I)iNEXT 
1290 GOTO 1070 
1300 し ABE し "MULT- 
1310 ZOO 

1320 FOR Z1=0 TO MAX 
1330 B<ZI>=B<ZI> 拿 ZZ+ZC 

1340 IF B<ZI ><1000 THEN ZC»OsGOTO 1370 
1350 ZC*INT<B(ZI)/1000) 

1360 B(ZI)-B(2I) MOD 1000 

1370 NEXT 11 

1380 RETURN 

1390 LABEL ,, CMP M 

1400 ZZ=0 

1410 FOR ZI-MAX TO 0 STEP -1 

1420 IF B(ZI >>A(ZI ) THEN ZZ-1：ZI —1 ： BOTO 1440 
1430 IF B(ZI )<A(ZI ) THEN ZZ—1 * ZI —1 *GOTO 1440 
1440 NEXT ZI 
1450 RETURN 
1460 し ABE し "SUB" 

1470 ZC«0 

1480 FOR Z1=0 TO MAX 
1490 B(ZI)=B(ZI)-A<ZI)-ZC 

1500 IF B(ZI)<0 THEN B<ZI)=B<ZI)+1000 ： ZC»1 ： G0T0 1520 

1510 ZOO 

1520 NEXT ZI 

1530 RETURN 

1540 LABEL"ADDS M 

1550 B(0)-B(0)+ZZ 
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002 A 
0010 
000日 
0000 


0000 


；INPUT DUMP し IST TO 
J DIMENSION OF BASIC 
5 


WIDTH 

EQU 

42 

；LENGTH OF VAR 

LINES 

EQU 

10H i 

i し ENBTH OF ROW 

CBYTE 

EQU 

8 

l BYTES IN 1 し INE 

DUMMY 

ORG 

EQU 

OCEOOH 

0 ! 

\ 5PMMY DATA 


特集 BASIC “行動学”入門 


文字変数なので， PRINT 文一発で1行分の 
表示が行われますから，速度もモニタのダ 
ンプと比べ，それほど遅くないはずです。 
この PRINT 文のところを QD や RAM ファ 
イ ルへの 書き込みにすれば，何とダンプリス 
卜のファイルができてしまうことになりま 
す。 

これを持って，どこかプリンタのある所 
に行って「ベ〜ッ！」と打ち出してしまえ 
ば，ダンプリストが一丁あがり，となるわ 
けです。 

HI ファイ J レ形式の共通性に注目 

さて，ここからは MZ 8 bit 系 （ K にあら 
ず）とはちょっと離れるのですが， DOS と 
BASIC のファイル形式が共通である場合の 
便利さについて触れておきましょう。 

このようなマシンとしては， PAS 0 PIA - 
16や PAS 0 PIA - 1600があります。 

PAS 0 PIA の場合は，まず MS - DOS が起 
動し，そこから BASIC をローディングして 
動作します。つまり BASIC も MS - DOS 上 

のひとつのファイルとして扱われているの 
で， BASIC で作ったファイルは当然のこと 
ながら， MS - DOS 上のファイルとなります。 

BASIC から アスキーセーブを 行えば， 
DOS 上のエディタ （ EDLIN 等）で扱えてし 
まいます。 

このことを使って，以前，私は BASIC か 
ら，アセンブラの ソース リストを作成した 
ことがあります。高速グラフィックを行う 
のに，どうしても三角関数のテーブルが必 
要だったのですが，アセンブラにはそんな 
関数は持っていません。といっても，手で， 
DB 〇〇,〇〇,……とたたいていたのでは， 
何時間かかるかわかりませんし，何より， 
動きがおかしいときに，テーブルがおかしい 
のか，プログラムが違っているのか，わか 
らなくなってしまいます。 

このときハタと気が付いたのが ， BASIC 
の存在でした。「あそこには実数演算ルー 
チンがある。三角関数など一発だ」という 
ことで作ったのが， BASIC で FOR 〜 NEX 
T ループを作り，その中でディスクに対し 
て値を PRINT する （PRINT #1，〇〇と 
いったもの）という，20行にも満たないも 
のでした。このプログラムは，本当に短い 
ものでしたが，非常に役に立ちました。電 
卓で計算して手で入力していたら何時間か 


1560 IF B(0>>1000 THEN ZC=INT<B<0)/lOOO)：B<0)«B<0) MOD 1000 
1570 FOR ZI=1 TO MAX 

1580 IF ZOO THEN ZI*=MAX+1«GOTO 1610 
1590 B(ZI)=B(ZI>+CY 

1600 IF B(ZI >>1000 THEN ZC=INT(B<ZI)/1000)sB<ZI)=B<ZI) MOD 1000： GOTO 1610 
1610 NEXT ZI 
1620 RETURN 


リスト 2 




ひと筆書き 


リスト3 A 


II メ 


モリダンプ • BASIC 部 


リスト 3 B || メモリダンプ•マシン語部ソースリス I 


Ml 


n 

1000 

I 

r /t - 



1010 

» - MEMORY DUMP PROGRAM - 


1020 

> - 



1030 

LIMIT*CDFF 



1040 

DIM A*<15) 



1050 

LOAD"DUMP.OBJ" 



1060 

GOSUB M DIMINZ" 



1070 

PRINT：INPUT "INPUT START ADRS : 

=•* JADR* 

1080 

ADR=VA し （"<*•+ADR* > 



1090 

AL=ADR MOD 256 : IF 

A し <0 THEN 

Al»256+AL 

1100 

AH=INT(ADR/256) : IF 

AH<0 THEN 

AH=256-*-AH 

1110 

POKE «CE01,AL 



1120 

POKE *CE02,AH 



1130 

USR(*CE00,A*(0)) 



1140 

FOR 1=0 TO15 



1150 

PRINT A«(I)； 



1160 

NEXT I 



1170 

GOTO 1070 



1180 


,.. » 


1190 

LABEf'DIHINZ" 



1200 

FOR 1=0 TO15 



1210 

A*(I)=SPC(40) 



1220 

NEXT I 



1230 

RETURN 




1000 INPUT" ノ ー»«* ノ カス*八イク 1 ！;テ*スカ？ '* ；N 
1010 DIM A(N,N> 

1020し*0 

1030 FOR 1=1 TO N-1 
1040 FOR J=I+1 TO N 

1050 PRINT I ；" 卜 M JJ" ノ 7 イラ*/ 5 チ I、ナン ホ *;/ テ'* ス tl"is INPUT A<I , J) 

1060 L=L+A(I,J)sA<J,I)=A<I,J) 

1070 NEXT J 

1080 NEXT I 

1090 FOR 1=1 TO N 

1100 PRINT 

1110 FOR J*1 TO N 

1120 PRINT A(I,J)； 

1130 NEXT J 
1140 NEXT I 

1150 PRINTSPRINT"TOTA し ROADS « し 
1160 DIM M(L) 

1170 S«l：D»lsC-1*W(C)»S 
1180 IF A(S,D)>0 THEN 1260 
1190 D»D+i:IF D<=N THEN 1180 
1200 A(W(C-1),S)=A(W<C-1),8)+1 

1210 A<S,W(C-1))=A(W<C-1),S) 

1220 C=*C-UIF OO THEN D=S+1 s S=W(C) ELSE S«<W(1)-«-l c W(1)»S： D=1：C=> 1 
1230 IF S>N THEN PRINT..IMPOSSIB し E ! ••: END 
1240 IF D<=N THEN 1180 
1250 GOTO 1200 

1260 A(S,D)»A(S,D)-1：A(D,S>»A<S,D) 

1270 FOR 1=1 TO C：PRINT W(I)5sNEXT：PRINTD 
1280 IF C= し THEN 1400 
1290 C=C+1：W(C)=D：S=D：D=1 
1300 GOTO 1180 

1400 PRINTSPRINT M ANSWERs"SPRINT W<i>； 

1410 FOR 1=2 TO L：PRINT** - > " ；W< I ) ； sNEXT 
1420 PRINT •• D 




1234567890 
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かるかわからないような巨大なテーブルが 
1分とかからずに生成されてしまったので 
すから。 

できあがったテーブルと，メインプログ 
ラムをエディタでつないで無事にアセンブ 
ルすることができました。 

このあとしばらくの間は，友人にこの巨 
大なテーブルを見せて驚かせていたこと 
は言うまでもないでしょう。 BASIC が他の 
言語用のソースを作れるというあたり ， D 
0 S 上で BASIC が走っていることのありが 
た味だなあなどと思ったものです。 

当然，これとは逆に，他の言語や DOS 上 
のエディタから BASIC のソースを作ること 
もできます。 BASIC のテキストをアスキー 
セーブしたものは即エディタで修正できる 
ことを使って， BASIC テキストを，英文ワ 
ープロを使ってきれいに整えたり，変数名 
の付け換え（ワープロの文字列置き換えの 
機能を使う）を行うなどのこともよくやり 
ましたし，人にプログラムリストを見せる 
ときや，リストを保存しておくときには， 
ワープロから印字させたりしています。ぺ 
ージ番号まで入るので，なかなか重宝なも 
のです。 

以上，私なりの BASIC の利用法はいか 
がだったでしょうか。 BASIC を広い意味で, 
機械へのインタフェイスとして使うとい 
うのは，慣れてくると実に便利なものです。 

まだまだ，ここで紹介しきれない利用法 
はいくらもあります。例を挙げて紹介する 
と， 

⑴大型コンピュータ等に，マイコン上で作 
ったプログラムのソースリストを移したい 

場合などでは， RS -232 C でつなぎ， BASIC 力、 
ら RS -232 C をオープンして大型コンピュー 
夕のエディタに入る文字列を PRINT しま 
す。そのあとソースリストを読み，そのま 
ま PRINT するループを作り，最後まで送 
ったら，今度はエディタを抜けるコマンド 
を送る。これで事実上，ターミナルから手 
でソースを入れたのと同じになります。 

⑵大型コンピュータから帰ってくる結果が 
BASIC ステートメントになるようにするこ 
とで，帰ってきた結果をグラフィック表示 
させる。 

等々……。 

皆さんもアイデアをしぼって，これから 
BASIC を活用してみてください。 


11 CEOO 210000 

12 CE03 3E10 

13 CE05 3284CE 

14 CE08 D5 

15 CE09 DDE1 

16 CEOB 

17 CEOB DDE5 

18 CEOD FDE1 

19 CEOF CD73CE 

20 

21 CE12 7C 

22 CE13 CD50CE 

23 CE16 FD 7300 

24 CE19 FD 7201 

25 CE1C 7D 

26 CE1D CD50CE 

27 CE20 FD7302 

28 CE23 FD 7203 

29 

30 CE26 110500 

31 CE29 FD19 

32 

33 CE2B 0608 

34 CE2D 

35 CE2D 7E 

36 CE2E 23 

37 CE2F CD50CE 

38 CE32 FD 7300 

39 CE35 FD7201 

40 CE38 110300 

41 CE3B FD19 

42 CE3D 10EE 

43 

44 CE3F 112A00 

45 CE42 DD19 

46 CE44 3A84CE 

47 CE47 D601 

48 CE49 3284CE 

49 CE4C C20BCE 

50 CE4F C9 

51 

52 

53 

54 

55 

56 

37 CE50 

58 CE50 D9 

59 CE51 47 

60 CE52 E60F 

61 CE54 CD69CE 
厶2 CE57 57 

63 CE58 78 

64 CE59 CB3F 

65 CE5B CB3F 

66 CE5D CB3F 

67 CE5F CB3F 

68 CE61 CD69CE 

69 CE64 5F 

70 CE65 D5 

71 CE66 D9 

72 CE67 D1 

73 CE68 C9 

74 

75 

76 

77 CE69 

78 CE69 FEOA 

79 CE6B 3003 

80 CE6D C630 

81 CE6F C9 

82 CE70 

83 CE70 C637 

84 CE72 C9 

85 

86 

87 

88 

89 CE73 

90 CE73 D9 

91 CE74 DDE5 

92 CE76 E1 

93 CE77 0628 

94 CE79 

95 CE79 3620 

96 CE7B 23 

97 CE7C 10FB 

98 

99 CE7E DD 36043 A 

100 CE82 D9 

101 CE83 C9 

102 

103 CE84 


SET し INE: 


し D 

ID 

LD 

PUSH 

POP 

PUSH 

POP 

CALL 


H し, DUMMY ； 

A,LINES 
(LCOUNT),A 
DE ； SAVE ADRS 
IX 


START ADDRESS 
LINE COUNTER 


IX 

IY 


BUFINZ 
SETUP ADDRESS —- 


ID 

CALL 

し D 
し D 
ID 
CALL 
し D 
し D 


A,H 

BTDHEX ； 

<IY),E 

(IY-H),D 

A,L 

BTDHEX 

(IY+2),E 

(IY+3),D 


し INE CLEAR 


BINARY TD HEX 


LD 
ADD 
SETUP DATA 


DE,5 

IY,DE 


SETDATAs 


LD 

s 

ID 

INC 

CALL 

LD 

し D 
し D 
ADD 
DJNZ 


NEXT CU し UM 
LD 
ADD 

し D 

SUB 
ID 
JP 
RET 


B,CBYTE 
A„<HL) 

H し 

BTQHEX 

<IY),E 

(IY+1),D 

DE，3 

IY,DE 

SETDATA 

fi - 

DE,WIDTH 
IX,DE 

A, (し COUNT> 
1 

(し COUNT),A 
NZ,SET し INE 


SET IX TO NEXT CU し LJM 


SET FINISHED? 


i . BINARY TO HEX CONVERT 

；ENTRY … ACC 
；RETURN … E=UPPER 
； … D= し OWER 

BTOHEXs . 

EXX 

LD B,A 

AND OFH 

CAL し NB し TOH 

し D D,A 

し D A,B 

SR し A 

SRL A 

SR し A 

SR し A 

CALI NBLTOH 

ID E»A 

PUSH DE 

EXX 

POP DE 

RET 

；_NIBBLE TO HEX CONVERT 

；ENTRY … ACC 
；RETURN … ACC 
NB し TOHs 


SAVE ACC 


NIBB し E TO HEX 


CP 

JR 

ADD 

RET 


OAH 
NC,NB し I 
A , ，〇, 


HI 


ADD 

RET 


A, W-OAH 


； - CLEAR 1 LINE_ 

?ENTRY … IX-TOP OF し INE 
；RETURN … NONE 
BUFINZs 

EXX 

PUSH IX $ COPY IX TO HL , 

POP HL 

し D B,WIDTH-2 

BUFC し R: 

LD <HL>〆 * 

INC HL 

DJNZ BUFC し R 

し D (IX+4),»x ? ； ADRS SEPARATER 

EXX 

RET 


LCOUNT： DEFS 1 
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ボケコンを使ってみよう 


Takahara Hideki 

高原ひでき 


ちょっと趣向を変えて，ポケコンを使っ 
てみました。 BASIC を通じてボケコンとい 
う機械のオペレーションに入門してみまし 
ょう。私の手元にはやや古い製品ですがシ 
ヤープのスタンダード機である PC - 1500が 
あります。 

まず初めに強調しておきたいのは，パソ 
コンとボケコンは使用目的，ひいては利用 
環境が大きく違います。ですから，プログ 
ラムを作る道具としては，パソコン用 BAS 
1 C と，ボケコン用 BASIC は異なるものとさ 
え言えるのです。 

とは言っても，言語としての BASIC を見 
ると，ボケコン用もパソコン用もほぼ同じ 
です。 Z $ を表示するときは PRINT Z $ で 
すし，値の入力は INPUT や A $= INKEY $, 
READ 〜 DATA などです。ループ文の FOR 
〜 NEXT もありますし，条件判断はやはり 
IF 〜 THEN です。 SIN , LOG などの関数の 
使い方もしかりです。 

ここまでを基礎知識として，あとはパソ 
コンとポケコンの使用環境の違いを考えな 
がら，ボケコンなりの BASIC によるプログ 
ラムの作り方を考えていきましょう。 

||表示機能の違い 

まず，表示機能の違いに注目したいと思 
います0ハ。ソコンのプログラムを作るとき 
は，80字 X 25行の画面いっぱいを使ってメ 
ツセージやデータ，計算結果を表示します。 
もちろん文字ごとに色を変えたり，カラー 
グラフイツクスを使うこともあります。こ 
の画面デザインは，いまやプログラミング 
の重要なファクターで，プログラマの腕の 
見せどころのひとつでしょう。 

ところ力' ポケコンは基本的には1行モ 
ノクロのキャラクタ（文字専用）デイスプ 


レイですから，デザインのしようがありま 
せん。ズバリ答がわかればいいのです 。 C 
LS や CURSOR に気を配る負担がずいぶん 
と軽くなるわけです。試しに次のプロダラ 
ムを考えてみましよう0 

10 A= 2 ： B = 8 
20 PRINT A ; “+”;B ; “ = ”;A + B 
30 PRINT A ; “x”;B ; “=”;A*B 
40 END 

実に単純なプログラムです。これをパソ 
コンで解くと， 


RUN 

2 + 8 =10 
2 X 8 =16 
OK. 


とデイスプレイ上に表示されます。 

では，ポケ コンは どうでしようか。 ここ 
で気がつくのは液晶デイスプレイは1行 
かないのですから， パソコン のように2つ 
の答を一度には表示できっこありません。 
実際の操作手順は 
RUN と IENTER 1 を押す 
2 + 8=10 と表示される 
[ ENTER ! を押す 

2 X 8=16 と表示される 
IENTERI を押す 
何も表示されない=終了 
ポヶコンは，ひとつ何か作業をしてデイ 
スフ。レイに表示したら，こちらの利用者側 
は「わかった」という気持ちをこめて_ 
[ TER ] キーを柙さなくては次に進めないよ 
うにできているのです。これは 
10 A = 2 ： B = 8 
20 FOR X =1 TO 8 


30 A = A + B 

40 PRINT X ; A ; 

50 NEXT X:END 
のように， 40 行でセミ b ロンを使った連続 
表示時でも同じです。 

WAIT 

とは言っても，毎回 [ ENTER 1 キーを 
押すのも場合によりけり。そこで押したく 
ないときのことも考慮されています。 

> WAIT (数字） 

(数字）を指定すると，数字/85 ( 秒）の 
間隔をあけて連続表示ができます。 

したがって，ポケコンのプログラムを作 
る場合の力点としては，パソコンで頭を悩 
ます画面デザインは不要で，どういう手順 
で表示すれば見やすいプログラムになるか 
にすべてをかけるのです。いわば面積では 
なく時間の制御といえます。 

リストの見やすさ 

もうひとつ，表示機能で見落とせないこ 
ととして，フ。ログラムリストが見やすいとい 
うことがあります 0 ハ。ソコンで リストを見 
ると，下から上にどんどんスクロールされ 
ていきますから，見たい部分を自分で選ば 
なくてはなりません。一度に見れる範囲は 
23行もあるので便利なようですが，リスト 
を流していて「あっ，行きすぎた」という 
経験は，誰しもどこかで経験していること 
と思います。 

ではボケコンは？もちろん1行しか見 
れないのですが，これをカバーするために 
上下 スクロールキー m . m があり， 
デ パ、ツグ 中でもプログラミング中でも，自 
由にリストを上下にスクロールして，見た 
い行を見ることができるようになっている 
のです。これはパソコンにもぜひほしい機 
能ですね （ turbo などにはありますが) 0 
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II 計算機能 

ところでポケコンは， パソコン に比べる 
と価格が安いこともあり，機能は「ボケコ 
ンが劣っている」ように感じますが，果た 
してそうでしようか。ここでみなさんにド 
キッとしてもらいまし i う。 


例題 I . 丨/9を9個加えると I になるは 
ずですね。でも本当にそうでしようか？ 

10 A=l/9 ： AA=C) 

20 FOR X=1 TO 9 
30 AA=AA+A 
40 NEXT X 

50 PRINT "GOSA: ;1-AA 
60 END 


これを確認するプログラムの例が例題 1 
で，パソコンでもポケコンでも使えます。 
1-(1/9) *9 を求めて，計算の狂い 
を調べてみます。もちろん完璧な計算なら 
0になるはずなのです。0以外の数字が表 
示されれば，それが誤差です。まずポケコ 
ンで計算すると 
1 E -10 

となりました 0 次に ハ。ソコン （ HuBASIC ) 
で計算してみましよう。 

-4.6566129 E -10 
どうですか，この結果。誤差が5倍近くあ 
り，しかもマイナスになっているのです。 

これは有効数字と誤差の関係なのですが， 
パソコン用 BASIC では，8桁以上の数字に 
なると誤差が発生します。その点ポケ コン 
は10桁までは大丈夫なようです。億単位の 
計算すらできないわけですから， パソコン 
はやはり個人用なんですかねえ。 

ちなみに1/9を求めてみると 

1.1 1111111 1 E -0 1 ポケコン 

.11111111 ハ。ソコン 

Hu BASIC は倍精度計算ができるのですが， 
その結果は 

.1111111111240461 
と，悲惨なものです。 

パソコン， ポケ コンと 言えども， コンビ 
ユータ=電子計算機です。この結果は何か 
おかしい と 感じざるをえません。とにかく 
巨額の取引計算やハレーすい星の軌道計算 
をするならボケ コンで， ということになり 
ましよう力、 
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|| メモリバックアップ機能 

うっかりパソコンのスイッチを切ると， 
そのときメモリの中にあるプログラムやデ 
ータはすべて消えてしまいます。そういう 
ものだと思ってしまいがちなのですが，よ 
くよく考えてみると，ムダな話です。とこ 
ろ力 5 '，ポケコンはちゃんと覚えていてくれ 
るんです。知ってましたか？ 

特に強調したいのは，その覚え方がハン 
パではなく，電源ボタンを OFF にする前と， 
ON にしたあとのメモリの状態がまったく同 
じなのです。ですからプログラムのリスト 
だけではなく，変数すベての値までそっく 
りそのままなのです。 

たとえば， A = 3とキーインして，電源 
ボタンを OFF にし，再び ON にするとどう 
なるか？ 

A IENTERI 

3 

とちゃんと表示されます。プログラムの途 
中で [ BREAKl キーを押して，電源ボタ 
ンを OFF にしたときも，どこで中断したか 
を覚えていますからスイッチ ON のあと， 

CONT IENTERI 
で再開できます。 

この理由は，ボケコンでは CMOS という 
低消費電力型のメモリ （ RAM ) を使い，そ 
こに書かれた情報をいつも電池でバックア 
ップしているからです。メモリのすべての 
内容が，電源ボタンの 0 N /0 FF にまった 
〈依存しないなんて，素晴しいと思いませ 
んか。 


例題 2. お買い物メモ 

スーパーで買い物するさいに，持ち合わ 
せが少ないと不安に襲われますね。そこで 
ボケコンを使ってみましよう。 

10 G=0 

20 INPUT ••? KINGAKU=" ；A 
30 INPUT •.? K0SU= u ；K 
40 PRINT "SHOKEI=";A 本 K 
50 INPUT "OK? (Y/N) n ； Z$ 

60 IF Z$= ,, Y U THEN 90 
70 IF Z*="N" THEN 20 
80 GOTO 50 
90 G=G+A 本 K 
100 PRINT "GOKEI=";G 
110 GOTO 20 


ここでは，ちょっと変わったプログラム 
にしてみました。プログラムは RUN で起動 
すると，変数の内容がすべてクリア（数字 
は0，文字列は“”）されます力 5 '，途中か 
ら始めると，保持されています。 

そこであらかじめ [FT] に 
GOTO 20 

と登録してぉきます。買い物を始めるとき 
だけ [ F 6] の RUN を押し，次からは [ FT | 
を押して使います。中断するときはいつで 
も [ OFF ] ボタンを押せばいいのです。 

さらに便利なことには，時刻を表す変数 
TIME も電源の ON / OFF と無関係なので 
す。メモリの内容保持機能とこの時計機能 
を連動すれば素晴しいソフトが作れそうで 
す。 

;||そして携帯性 

そして決定的にパソコンと違うのは，パ 
ソコンが机の上に置いて使うようにできて 
いるのに対し，ポケコンはどこででも使え 
るような携帯用であることです。 

いきぉいプログラムも，本来はこの携帯 
性を考慮したものでなくてはならないはず 
です。では携帯性を考慮したプログラムと 
はどんなものでしょう力*。それは人それぞ 
れで違うはずです。 セールスマンの 人が セ 
ールスデータの 収集，加工分析に外出先で， 
銀行などではどこにでも持ち運べる利率の 
計算機として窓口で使っています。また大 
学では，狭い実験室の中で場所をとらずに 
すぐ複雑な計算をこなす コンピュータ とし 
て使う ケースが 多いようです。みなさんも 
自分の生活を眺めてみて，自分なりのポケ 
コンの 使い方を探してみてください。とり 
あえずここでは私が使ってみて便利だと感 
じたことがある自作プログラムを2つ紹介 
しておきます。 


例題 3. 〇 X テスト回答用紙 

週刊誌の性格分析から運転免許のペーパ 
—テストまでたくさんの〇 X 式テストがあ 
りますが，ボケコンを回答用紙兼採点機と 
して使いましよう。 


あっ，ばれま U こか。 以前 BASIC 塾でサ 
ンプルプログラムに使った ものです。でも 

















特集 BASIC “行動学”入門 


NEXT XSNEXT Y 

FOR X=M TO1 STEP 一 i 

PRINT X;N$(X〉；"：NET";N(X> 

PRINT 0<X) ; 0"5I <X> ； H<X)5"-H m 

NEXT X 

END 

REM DATA "NAME",H ? 0,I 
DATA ••Q-TAR0 ,, ,36 ! »59,69 
DATA "PAMAN",6,38,41 
DATA "HATTORI", 12,42,49 
DATA "DORA",18,51,62 
DATA 0,0,0 


10 M=0 
20 READ 

30 IF Z$= ••本" THEN 50 
40 M=M+1：G0T0 20 
50 RESTORE 500 

60 DIM N$(M) ? H(M) ! ,N(M),0(M),I(M) 

70 FOR X=1 TO M 

80 READ N$(X),H(X),0(X)!，I(X) 

90 N(X)=0(X)+I(X)-H(X) 

100 NEXT X 

110 FOR V=1 TO M — 1 

120 FOR X=Y+1 TO M 

130 IF N(X)>N(Y) THEN 190 

140 Z$=N$(X)：N$<X)=N$< Y >:N 车 < Y > =Z$ 

150 Z=0(X)S0(X)=0(Y)：0(Y)=Z 

160 Z=I(X)：I<X)=I(Y)sl(Y)=Z 

170 Z=H(X)：H<X)=H(Y)：H(Y)=Z 

180 Z=N(X)：N(X)=N<Y)sN(Y)=Z 


このプログラムは私自身 PC -1500 用が実用 
的だったので掲載したんです。 

使い方は問題数を入力して，問1から順 
に回答を記入します。〇なら匚^ (ゼロ）， 

X なら [£] (プラス〉 です。入カ ミスし 
たら [ S で戻ります。終了後，正解を記 
入します。あとで点数が表示されたあと， 
間違った問題番号をまとめて表示する親切 
設計です。 


例題 3.1 〇 X テスI 


例題4 . ゴルフコンペ順位計算機 

小規模なゴルフコンペならポケコンで順 
位とスコアを計算しちゃいましよう。もち 
ろんプリンタつきならベターです。 


ゴルフ コンペの あと，成績を幹事氏が電 
卓で計算している姿をよく見かけるので試 
しに作ってみたのです。使い方は510行か 
ら998行までの間で DATA 文として名前， 

ハンデ，アウトのスコア，インのスコアの 
順に語入します。そして RUN するだけで 
す。記入例を510行から540行までに納めて 
います。なぉ名前を“”でく くるのを忘れ 
ずに。 * 

★ ★ 
どうでしたか。まだボケ コンが そう小さ 
くないので，本格的に個人で使っている人 
は少ないようです が， 近い将来いまの電卓 
ぐらいにはなるはずです。その日を夢みて 
ボケ コンを たまには使ってみてください。 

例題 4. ||ゴルフプログラム 


10 P=0sWAIT 200 
20 INPUT"> HOW MANY Q.s »5N 
30 DIM Y(N),A(N) 

40 PRINT n 0=<0s ZERO> X=<+> BACK=<B> n 

50 WAIT 30 

60 FOR X=1 TO N 

70 PRINT "> Q."5X； n ... n 5 

80 GOSUB 300 

90 IF K<>3 THEN 100 

95 X=X-1:C し S:GOTO 70 

100 Y(X)=K 

110 NEXT X 

150 FOR X=1 TO N 

160 PRINT 

170 GOSUB 300 

180 IF K<>3 THEN 190 

185 X=X-1：CLS：G0T0160 

190 A(X)=K 

200 IF K=Y(X)THEN PRI NT"OK." : P=P+1s G0T0220 
210 PRINT"MISTAKE!" 

220 NEXT XsWAIT 100 

230 PRINT "POINT: •• ;INT(P/N* 100+.5〉 

240 PRINT "MISS. " _•； 

250 FOR X=1 TO N 
260 IF A(X)OY(X) 

270 NEXT X：END 
300 REM —— SUB - 
310 GET K% 

320 IF K$= M " THEN 
330 K=0 

340 IF KWO" THEN 360 
350 K=1：PRINT n 0 M s RETURN 
360 IF KW + " THEN 380 
370 K=2：PRINT u X H s RETURN 
380 IF K*<>"B" THEN 310 
390 IF X=1 THEN 310 
400 K=3：RETURN 


THEN PRINTX5 


310 


00 0 000000009 
9 o12 3 4 0 12 3 4 9 
12 2 2 2 2 5 5 555 9 
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求む究極の BASIC 


I'.vai 

祝 


Ippei 

一平 



BASIC という言語はかわいそうな言語で 
ある。初心者でも使えるという理由によっ 
て大勢の人に使われるようになったが，そ 
の反面，初心者用だからという理由でまと 
もに扱ってもらえなくなってしまった。つ 
まり，研究対象とはなりえず「進化」が止 
まってしまったのだ。グラフイツク関係の 
命令を取り込んだりして高機能 • 多機能化 
はしているが，もっとも基本的なアルゴリ 
ズムの表現法などは貧弱なままに取り残さ 
れてしまっているのだ。 

たとえば IF 文である。 

「 IF 〜 THEN 〜 ELSE 」 が使えるのはよい 
が，バカバカしいことに1行中に書かなけ 
ればならない。だから，時として書ききれ 
なくなってしまい， GOTO を使って分岐を 
しなければならなくなるのである。 

もし1行中に書ききれたとしても，べっ 
たりとした「詰め書き」になりがちで，80 
字を越えて画面の右端から左端へ折り返し 
たりすると，読みにくさは頂点に達してし 
まうのである。ぎ 一っ！ 

そこでちょいとあたりを見渡せば，解決 
策は江ノ島の海水浴客のようにいくらでも 
ころがっているのである。たとえば， 

IF 〜 THEN 〔〜〕 ELSE〔〜〕END IF 

のようにカギカツコも付けられるようにし 
てしまうのである。すなわち，「カギカツ 
コ入りの IF 文は，複数行にわたる可能性も 
あるんだぞよ」である。 MZ - 2500の BASI 
C には同じような機能があるが，どっこい 
こちらはちゃんとしたブロック文の概念を 
BASIC に持ち込んだ点が違うのだ。 MZ - 
2 5 〇0のほうはブロツク文という考え方がな 
いから，使いごこちはあんまり良くない， 

と私は独断するのである。 

私はこの小文中で，このよ一にして BA 
SIC の明日を考えつつ，日ごろのイライラ 
を解消したいと思うしだいであった。 

というわけで 

まずは，最初に言ったように BASIC に 
もブロック文という考えを取り込んでしま 


うのである。これは今のところ IF 文以外で 
はあんまり使い道がない感じだけど ， BAS 
1 C の近代化ぉよび明るい未来には必要なも 
のと確信するのである。 

次に考えるのは サブルーチンコールの 拡 
張である。現在の BASIC ではまともな サブ 
ルーチンコーノレ がで きない。どういう こと 
かというと， GOSUB には次のような欠点 
があるのだ。 

① 引数（パラメータ）を記述できない。 

② サブルーチン内で局所変数を使えない 0 

③ 関数を記述できない。 

具体的に①は， 

10 A =1 : B = 5 : GOSUB 100 
のように，変数に値を入れて GOSUB しな 
ければならないということである。これは 
最低である。 

② は飛び先でうかつに変数をいじれない 
ということである。たとえば FOR 文では I 
という変数がよく使われる。そこで， 

10 FOR 1 =1 TO 100 
20 GOSUB 100 : NEXT 

というのは，どこにでもころがっているプ 
ログラムであろう〇そこでついつい飛び先 
のサブルーチンでも 

100 FOR 1 = 10 TO 50 
などとやってしまい，「れれれのれ」という 
ことになってしまう。プログラムが大きく 
なると，この「変数管理」は白熱してきて 
バグ®(りの効率を下げることになるのであ 
る。 

③ はよ一するに DEFFN で記述できない 
関数のことを言っているのである 。 DEFFN 
は1行で記述できる「簡単な式」しか許さ 
れないのだ。だから， 

• N が素数なら1，それ以外は0を返す 
• A $の内容を逆順にしたものを返す（た 
とえば “ BOOK ”—“ KOOB ”） 

というような関数は記述できないのである。 
以上の点から正し いサブルーチンコールは 
次のようになるべきである。 


a ) GOSUB はそのまま残す。 

b ) 「PROC SUB 1( X , Y)j という 。 PRO 
C (PROCEDURE :プロシージャ：手続 
き）文を{，り 


前号までのあらすじ 

東西新聞社の創立百周年記念事業の 
ひとつである，山岡士郎と栗田ゆう子 
の「究極のメニュー」作りと時を合わ 
せて，私•祝一平は「究極の パソコン 
:満開一号」作りに取り組んでいた。 
しかし私はやがて大きな壁に「こんに 
ちは」してしまったのである。それは 
標準搭載の言語をど一するかというこ 
とであった。とにかくも BASIC は載 
せざるをえない。しかし私は BASIC 
があまりにも貧弱，ノロい，イモい， 
サバい，その場しのぎ，ドラ1 パ、ンパ、 
ンのハネ満であることを痛感していた 
のであった。そんなある日，私が自宅 
のドアを開けるとハガキが落ちていた。 
それには「この家のどこかに宝が隠さ 
れている」とは書いてなく，その代わ 
りに「悪いシステムプログラマに誘拐 
されてしまいました。助けてください。 
BASIC より j と書いてあったのである。 
私は「ざけんじゃない！オレは妖1圣 
探偵ちまちまじゃねえ。こんなハガキ 
を出すヒマがあるなら，さっさと逃げ 
りゃい一じゃね一か」とつぶやき，憎 
憎しげにハガキを破り裂こうとしたの 
である。しかし私は寸前で思いとどま 
った。それは“悪いシステムプログラ 
マ”という言葉にひっかかったからで 
ある。やがて，さまざまな点と線がゆ 
っ〈りと.流れていき，ついにひとつの 
姿にまとまっていった。私は戦いの始 
まりを予感しっつ，近所の酒屋で買っ 
たカンビールを冷蔵庫の前 に m いたの 
であった……。 
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10 SUB 1(5, 6) 

とするだけで飛んでくるようにする。も 
ちろん SUB 1 が定義されてなければエラ 
一になる0リターンは RETPROC である。 

c ) 「FUNC KANSU 1( X ， Y )」 という， 
FUNC ( FUNCTION : フアンクシヨン： 
関数）文も作る。これは関数定義である。 
返す値は， 「 RETFUNC 〜」で指定する。 

d) それぞれの PROC，FUNC 中で使う変 
数は，当然局所変数で，なおかつ「宣言」 
しなければならない。 

最後の d ) は，ちょっとナニだから， 
d ') それぞれの PROC，FUNC 中で使う変 
数は自動的に関数名を頭につける。たと 
え ば SUB1 という PROC の中の X という 
関数は SUB1_X という変数として扱わ 
れる アンダーバーを はさんで いる 
のが ミソ。このアンダーバーは 普通は使 
えない ようにする)。 こ うすれば外部から 
参照，書き込みもできる。 SUB1(X ， Y) 
で受けた引数も，それぞれ（広域変数で 
は） SUB1— X ， SUB1_Y となって いる。 

この場合は再帰呼び出しなどができなく 
なるがしかたない。 

方法としては， d ) と d ') の中間として， 
「 PROC 」 と 「SPECIAL PROC 」 の2つを 
作り， SPECIAL のほうは d ) に書いたよう 
なやつにするという手もある。よしよし， 
これを d ") としよう。そこでさっそく，リ 
スト1力？「ブロック文と PROC ， FUNC 文 
を使ったサンプルプログラム」である。い 
わずもがなだが， PROC 文には BASIC のコ 
マンドを自由に増やすような効果があるの 
だ。おっと，念のために言っておくが ， P 
ROC と FUNC は，値を返すかど一かの違い 
だけである。 

次に何をやり玉にあげよ一かなと捜して 
みると，あったあった。変数タイプである。 
まず，文字列の長さが255文字以下という 
制限をとっぱらう。ここは最低でも65535 
文字まで許してしまおう。いやいや，やは 
り32ビット （= 4バイト）で &HFFFFFFF 
F #4096 M バイトまでの長さを許すことに 
しよう。当然整数型も現在の倍の32ビット 
にしてしまう。実数型と倍精度型はそのま 
まにしておいて，なおかつ倍倍精度型も作 
ってしまう。う〜ん，まだなにか足りない 
な 一0 

というわけで，「可変精度実数型 J という 
のを作ってしまえ。一般的に実数の精度は 
仮数部の桁数（範囲）と指数部の桁数（範 
囲）で決まるので， 

DEF XPR (仮数部桁数，指数部桁数） 
A-F 


などとしてしまう。 XPR というのは 
X PRECISION (エツクス精度） 
というコジツヶである。たとえば， 

DEF XPR (100,10) A-F 
とすると 

-0.877. 5X 10- 1234 56789 

100桁 10桁 

という数字も扱えるようになってしまうの 
だ。計算は BCD (2 進化10進数）で行うこ 
とにする。もちろん，精度が高ければ演算 
速度は遅くなるしメモリも食うが，それは 
それでよいのだ。おっと，いちいち精度を 
指定するのは面倒だから， 

XPR 1— XPR (20，10) 
XPR 2-> XPR (50,10) 

ぐらいはあらかじめ用意しておくことにす 
る。 

次に「むっ」とするのはファイル関係で 
ある。たとえばファイル名は表示できるが 
「ファイル名を返す関数」が存在しない。 
よって， 

A $= FILENAME $(“0:”，5) 
のように， 「 n 番目のファイル名」を返す 
関数を作ってしまう0なければヌルストリ 
ングを返す。それから，現在のファイル名 
指定には「ワイルドカード」が使えないの 
は最低といわざるをえない。よって， 
FILES “*. Bas ” 

とすれば“〜. Bas ” のファイルだけを表示 
するようにしてしまう。さらにもう 少、しひ 
ねって， 

FILES ， BIN (もしく は bin ) 

とするとすべての機械語ファイルを表示する 
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ようにする0アスキーファイルの場合は 「A 
SC 」 だな0もちろん，ワイルドカードとの 
併用も可である。まだまだあるぞ。プログ 
ラムサイズを表示する場合は 
FILES „ SIZE 
である。 

そいうわけで 

残念ながら誌面が尽きかけてきた。若干 
もの足りないが ここい ら へんで やめておく 
のである。なんだかんだ言っても，私が書 
いたことは基本的にはほかの言語，システ 
ムではすでに実用化されていることなので 
ある。だから，私でなくても思いつけるこ 
としかあえて書いていないつもりである。 

BASIC の未来を考えると完全にまっ暗で 
ある。たとえば CPU 力 ? Z 80 から8086に変わ 
っても，基本的には何も進化しなかった。 

8ビット用の BASIC がメモリや速度の点で 
大きな制約を受けていたということから考 
えれば， CPU が16ビットになった段階で何 
らかの進化があって当然だったはずなのだ。 
しかし，世の システム プログラマの方々に 
はそんなことは思、いもよらなかったらしく， 
「機能が制限された8ビット用 BASIC 」 の 
影をいつまでもずるずると引きずっている。 
BASIC は初心者用言語である。だからこそ， 
ほかの言語よりも重要なのである。まもな 
くホビー用として16ビット マシンが'，ひい 
ては32ビットマシンまで広まるであろう。 
そのときにどんな BASIC が出てくるかを私 
は手ぐすね引いて侍っているのだ。 

BASIC ままだまだ可能性を秘めた言語な 
のである。 


I ス I 


サンプルプログラム 


((A=0) OR (B=0)) 

AND ( DEVICE$ = .，EMM 1 : .，> ] 

GOSUB , ， INIT-DEVICE" : 

DUMP-MAP(DEVICES,0, 15):] 

PRINT ” 桃から産まれた桃太郎”： 
PRINT •' 許さん！"， 

KREVERSE(" るすすを血き生 , .}: 
は省略できるのだ 


これも許される 
PROC を呼びだす 


これは閲数 


100 IF 
110 

120 THEN 
130 

140 ELSE 
150 
160 

170 » ENDIF 
180 END 
190 1 

200 PROC DUMP-MAP(DEV$,START,LAST) 

210 FOR I=START TO LAST 
220 ，省略 

230 NEXT 
240 RETPROC 
250 * 

260 FUNC KREVERSE(KS) ノ漢字を逆順にする関数 

270 R$ = •，” ： LAST = LEN(K$)/2 :，この LAST は KREVERSE 一 LAS 丁 

280 FOR I=LAST TO 1 STEP -1 
290 R$=R$+MID$(K$,I*2-1,2) 

300 NEXT 

310 RETFUNC R$ 


この LAST は DUMP-MAP 一 ] LAST 
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Oh!MZ を音読しよう 

専門誌の正しい読み方 


Koichi Tetsuji 

挙市哲司 


コンピュータ用語には英単語やその省略形がいっぱいです。これらを正しく発音するこ 
とは用語の理解につながります。 AUTO は「アウト」ではなく 「オート」と読んでいただ 
きたい。これは，円滑なコミュニケーションのための「音読講座」です。 


皆さんは Oh ! MZ を読むときにちゃんと 
声に出して読んでいますか。周りの人がお 
や？と振り向いたところであの表紙を見 
せる。ここまでしてこそ真の（その筋の） 
読者です。さて，そのときに間違った読み 
方をして恥をかくことのないように，これ 
から正しいコンピュータ用語の読み方とい 
うのを説明してみたいと思います。 

読み方なんて自分でわかっていればどう 
でもいいじゃないか，と言う人もいるかも 
しれませんが，とんでもありません。日本 
語を自分勝手な読み方で読んでいる人がい 
るでしょうか。ちゃんと読んで話している 
からこそ，人に言葉すなわち情報を伝えて, 
その情報を理解してもらうことができるの 
です。 

正しく読むことの効果は，人に理解して 
もらうだけではありません。自分が理解す 
る上でもたいへん重要です。文字はただ並 
んでいるだけではなく，そこには意味があ 
ります。正しく読むことによってその意味 
を理解できるのです。 

驚かすのはこれくらいにして読み方講座 
に入りましょう。今回は BASIC 特集の一環 
ですので BASIC 用語が中心です。受講料48 
0円はもうお支払いいただいたことと思いま 
すが，まだの方はすぐにレジへどうぞ。 

||コンピュータ用語は英語である 

コンピュータの ハード やソフトはこれま 
で主にアメリカで発達してきました。した 
がってその用語には英語（あるいはその省 
略形）が使われています。当然といえば当 
然です。つまり，コンピュータ用語にはな 
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んらかの意味があり，単なるアルフ アベッ 
卜の羅列ではないということです。たとえ 
ば Z 80 マシン 語の LD 命令，これは「エルデ 
ィー」ではなく 「LoaD (ロード）」であり， 
「転送する」という意味です。これだけで 
も正しく読むということの重要さがおわか 
りいただけるかと思います。アセンブリ言 
語に限らずすべてのコンピュータ用語は， 
正しく読むことがその意味を理解するため 
のいちばんの近道です。 

英語と聞いてビビル人は Oh !(これもそ 
う） MZ の読者にはいないと思います力 ? ，英 
語といってもそう難しいものではありませ 
んからご安心を。できれば英和辞典を片手 
にどうぞ。 

3 || BASIC は単語のオンバレード 


しよう。 BASIC は初心者用の名のとおり， 
簡単な英単語やその省略形で構成され てい 
ます。表1に主な BASIC の命令，表2に関 
数に ついて 読み方などを アルフアベ ツト順 
にまとめてみました。これで BASIC 7° ログ 
ラムは自由自在に読めるように練習しまし 
よう。元の英語の意味と BASIC における意 
味を比べてみるのもおもしろいと思います。 

あと，補足する点が少しあります。まず， 
プリンタ閨係の命令についてですが ， S B 
ASIC ではプリンタに出力する場合，命令の 
後ろに / P を付けます。この P はプリンタ （P 
rinter ) の P です。 HuBASIC では命令の頭 
に L ですね 0 これはラ.インプリンタ （Line 

Printer )、 の L です。それぞれ， . スラツ 

シユピー，エル……と読んでください。そ 
れから， S - BASIC のファイル閨係の命令 


それでは BASIC 用語の読み方に入りま に ROPEN ， WOPEN , VERIFY がありま 


Oh ! MZ は難しいよ〜 

♦初心者にはわけのわからない言葉が多すぎて 
困っています。助けてくれ〜。 

城越明人 (16) 福井県 
•もっと説明などをわかりやすくしてほしい。 
意味のわからない言葉がある。たとえば CP / M 。 

波多野良博 (15) 新潟県 
•まだパソコンを始めて丨年ぐらいの初心者の 
ため，説明が難しいところやわからない言葉が 
多い。用語の解説集のようなものを載せてほし 
い。 鈴木祐一 (25) 神奈川県 

•私は今年パソコンにさわったばかりのバソコ 
ン I 年生です 。 Oh ! MZ は私には少し難しいみ 
たいです。丨ページか2ページでよいから ，I 
年生のページを設けてほしい。わかりやすく BA 
SIC , マシン語を解説してほしいと思います。 

安藤紀之 (40) 北海道 
•しだいにマシン語レベルの内容が增えてきて 
難しくなってきているので，なかなか自分の能 


力が雑誌に追いつけなくなってきている。もう 
少しやさしい内容でお願いしたい。 

半澤裕子 （26) 宮城県 
籲初心者の僕にはほとんど理解できない内容ば 
かりだけど.いつか理解できる日がくると信じ 
て毎月買ってます。加納正則 （16) 岐阜県 
•もし12月号のハード特集が難しかったら…… 
いやです。 島野嘉樹 （16) 兵庫県 

•私は英語が苦手です！ただそれだけです。 

長谷川浩 (16) 神奈川県 
• S-0S って何ですか（あっ見放さないで！） 
どうやって手に入れるの？ 

椿井健司 （15) 愛媛県 
•STUDIO MZ に出てくる「㈱満開製作所 j と 
いうのは何のことですか？ 

坂本真志 (14) 島根県 
•「PSG はてりめぇである」の「てりめぇ j と 
は何ですか？ 塩田耕司 （16) 徳島県 

•PITMAN の解答，とりあえず19, 25, 26面教 
えてぇ〜。 松下耕三 （16) 大阪府 














リスト 1 


10 

FOR I - 

32 TO 255 

2 0 

PRINT 

CHRS( I) : 

3 0 

4 0 

NEXT I 
END 



すが，それぞれリードオープン，ライトオ 
ープン，ベリファイと読みます。 


それではリスト1を見て〈ださい。これ 
は アスキーコード 32から255までのキャラ 
クタを表示するプログラムです。これを読 
んでみましよう。 

10行フォアアイイコール32 
トゥ255 

20行プリントキャラクタダラー 

かっこアイかっこ閉じるセミコ 

ロン 

30行ネクストアイ 

40 行エンド 

さて，ここで=や $() ;などのキャラ 
クタが出てきました。リスト1のプログラ 
ムを実行させるともっといろいろなキャラ 
クタが表示されます。全部読むことができ 
ますか？そこで，お次はキャラクタ編と 
いきましよう。 

|||キャラクタにも読み方がある 

キャラクタを全部正確に読める人はあま 
りいないのではないかと思います。たとえ 
ば'， * という言己号にしても BASIC では掛け 
算の記号ですが，キャラクタとしての名前 
は星印またはアスタリスタですね。 

JIS (日本工業規格）ではこれらのキャ 
ラクタの名前がすべて決まっています。し 
かし，読み方としてそれに忠実に従う必要 
はないでしよう。誰が聞いてもそれとわか 
る読み方であればいいのではないでしよう 
か。ところ力 5 ',仲間内ではわかっていても 
ほかの場所では全然通用しなかったという 
ことが多々あります。そこで，通称と JIS 
の読み方，好ましくない読み方を表3にま 
とめてみました。 

どうですか？ へえ，こんなふうに言売む 
のか，知らなかった，というのがけっこう 
たくさんあるのではないでしよう力、全部 
党える必要はありませんが，間違った読み 
方をしていたという人は直してくださいね。 

表にはまだ空欄があります力 ? ，これは皆 
さんで埋めましよう。アンケートはがきの 
片隅にでも書いて送ってください。 


特集 BASIC “行動学”入門 


表 1 BASIC の主な命令の読み方 


命 令 

読み方 

元の英語 

英語の意味 

AUTO 

オート 

automate 

自動化する 

BOX 

ボックス 

box 

箱 

CIRCLE 

サークル 

circle 

円 

CLEAR, G し R 

クリア 

clear 

片付ける 

CLOSE 

クローズ 

close 

閉じる 

CI_S 

クリアスクリーン，シーエルエス 

clear screen 

画面 消去 

〇〇し OR 

カラー 

color 

色 

CONSOLE 

コンソール 

console 

操作卓 

CONT 

コント，コンテイニユー 

continue 

統ける 

CURSOR 

カーソル 

cursor 

(計算尺の〉滑子 

DEF FN 

デフアインフアンクション， 

デフエフエヌ 

define function 

闋数定義 

DELETE 

デリート 

delete 

削除する 

DIM 

デイメンジョン 

dimension 

寸法，次元 

DIR 

ディレクトリ，ディーアイアール 

directory 

住所氏名録 

END 

エンド 

end 

終わり 

FILES 

フアイルズ 

files 

害類 さし 

FOR 〜 NEXT 

プ 7 ：〜ネクスト 

for—next 

向かって〜次 

GET 

ゲット 

get 

取る 

GOSUB 

ゴーサブ 

go subroutine 

サブルーチンへ行く 

GOTO 

ゴートゥ 

go to 

〜へ•行く 

IF 〜 THEN 〜 E1_SE 

イフ〜ゼン〜エルスー 

if 〜 then 〜 else 

もし〜それなら〜代わりに 

INP 

インプット，インプ 

input 

入力する 

INPUT 

インプット 

i nput 

入力する 

KEY 

キー 

key 

鏺 

LABEL 

ラベル 

label 

ラベル，貼り紙 

LIMIT 

リミット 

limit 

境界 

LINE 

ライン 

line 

線 

LIST 

リスト 

list 

表 

LOAD 

口ード 

load 

荷物を積む 

LOCATE 

ロケート 

locate 

位置を示す 

MON 

モニタ 

monitor 

監視装置 

MUSIC 

ミュージック 

music 

音楽 

NEW 

ニ ユー 

new 

新しい 

ON 

オン 1 

on 

〜に基づいて 

OPEN 

オープン 

open 

開く 

OUT 

アウト 

output 

出力 

PAINT 

ペイント 

paint 

塗る 

P し AY 

ブレイ 

play 

演奏する 

POKE 

ポーク 

poke 

突っ込む 

PRESET 

ポイントリセット，ビーリセット 

point reset 

点を置き直す 

PRINT 

プリント 

print 

印刷する 

PSET 

ポイントセット，ビーセット 

point set 

点を置く 

READ-DATA 

リ _ ド〜 データ 

r ead —data 

読む〜情報 

REM 

レム（リマーク） 

remark 

注意 

RENUM 

リナンバ 

renumber 

番号を付け直す 

RESTORE 

リストア 

restore 

元どおりにする 

RESUME 

リジュ ー ム 

resume 

再び始める 

RETURN 

リターン 

return 

戻る 

RUN 

ラン 

run 

走らせる 

SAVE 

セーブ 

save 

蓄える，取って おく 

SCREEN 

スクリーン 

screen 

映像画 

STOP 

ストップ 

stop 

止める 

TRON/OFF 

トレースオン/オフ 

trace on/off 

追跡する/やめる 

USING 

ユージング 

using 

使いながら 

USR 

ユー ザー 

user 

使用者 


Oh ! MZ は難しいのだだだ…… 

とりあえず，ど一して Oh ! MZ が難しいのか 
を説明するのである。 

第一に用語が難しいというわけだ。しかし， 
これは「難しい j 以前の問題なのである。なぜ 
なら，用語を憶えなければど一にもしよ一がな 
いわけで，早い話が難しいなんちうぜ一たくな 
シロモノではなく，金色に光り輝く「必修」な 
のである。 

次に，内容が難しいというわけだ。しかし， 
これもおそらく 「用語がわからないから内容も 
わかんな一い j という展開が多いと見る私であ 
つた。たとえば「リロケータブル j という用語 
などなどを知らなければ，今月の SENTINEL の 
中の A しし 0QATER や BOUNCER の説明もわ力、ん 
ないわけである。「用語は全部わかるけど内容が 
難しくてわかんない j という人は，そうはいな 


いはずなのだ。 

このよ 一に ゴリ押ししていくと，「まずは用語 
を知る：：とだ」ということになるのである。し 
かしそれでもまだわかんない人がいるだろう。 
そこで私は突然逆上するのである。 

てめ一ら，嚙んで含むような記事なんか期待 
すんじやね 一。 ババンババンバンバン毎月買っ 
てるか！なのだ。毎月用語解説を載せれるわ 
きやね一だろ。そんなことだから辱近の若いモ 
ンは，骨が弱かったり，鉛筆を削れなかったり， 
魚をオロセなかったり，朝礼で倒れたりするん 
でい 。 Oh ! MZ は難しいから価値があるんだ。 
頭のてっぺんから尻尾の先まで，すんなり読ん 
じまえるよ一な軟弱な雑誌なんか，価値がね一 
じやね一か。難しさを乗り越えてこそ向上っつ 
うもんがあるんでい。苦しいからこそ RPG は面 
白いんでい 。 Oh ! MZ はドラゴンなんだっ。わ 
かったかかか！ （柷一平） 
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Ill Let’s Communicate ! 

さて，これまでの説明で BASIC について 
は完璧に読めるようになったことと思いま 
す。人に伝えるだけなら別にアルファベッ 
卜をそのまま読んでも相手に通じることは 
通じます0しかし，それはアルファベット 
を並べて会話しようとするようなもので， 
相手はいったん書きとめでもしない限りそ 
の意味を理解することはできません。 

編集室に質問電話をかけてくる人の中で， 
変な読み方をして担当の人相手に漫才をふ 
っかける人がいるそうですが，電話では読 
むしか伝える方法がありませんから，きち 
んと読まないと相手に質問の内容を理解し 
てもらえません。今後質問電話をする方は 
この講座をよく読んでこの講座の読み方に 
統一するようにすると，円滑なコミュニケ 
ーシヨンができるのではないでしよう力、。 

ついでに，キーボードのキーの呼び方に 
ついても表4にまとめておきます。よく， 
SHIFT +， CTRL +， GRAPH + という表 
現がありますが，これはそれぞれシフトキ 
一，コントロールキー， グラフ キーを 押し 
ながら指定されたキーを押すという意味で， 
シフトプラス， コントロール プラス，グラ 
フプラスと読みましよう。 

本講座では BASIC 中心に解説してきまし 
たが， BASIC に限らず，マシン語やそのほ 
かの言語に おいて も マスターし ようとす る 
ときは，読み方も一緒に覚えましよう。そ 
れが上達へのいちばんの近道なのです。 


表 4 キーボードの読み方 


キートップ 

呼び 方 

CR , 〇, ENT 

リターン 

BREAK 

ブレイク 

DE し 

デリート 

INST 

インサート 

HOME 

ホー厶 

C 1 _R 

クリァ 

t 

カーソルアップ 

1 

カーソルダウン 


カーソルライト 

4 ■— 

カーソルレフト 

SHIFT 

シフト 

CTRL 

コントロール 

GRAPH 

グラフ，グラフィック 

英数 

エイスウ 

カナ 

カナ 

CAPS LOCK 

キヤビタル（ス）ロック 

ESC 

エスケープ 

( H)TAB 

(ホリゾンタル）タブ 

XFER 

エックスファー 

F 卜 F 10 

フ ァンク シヨ ンキー1 ~10, 


エフ丨〜エフ10 

ROLL UP 

ロールアップ 

ROLL DOWN 

ロールダウン 

HE し P 

ヘルプ 

COPY 

コビー 


表 2 BASIC の関数の読み方（発音しにくいものは英字をそのまま読んでもよい） 


関 数 

読み方 

元の英語 

英語の意味 

ABS 

アブソリュート 

absolute 

絶対の 

AND 

ァンド 

and 

かつ 

ASC 

アスキー 

ascii 

アスキー 

ATN 

アークタンジェント 

arctangent 

逆正接 

CHR 

キャラクタ 

character 

文字，記号 

COS 

コサイン 

cosine 

余弦 

EOF 

エンドオブファイル 

end of file 

ファイルの終わり 

EXP 

イクスポーネント 

exponent 

指数 

FAC 

ファクトリアル 

factorial 

階乗 

FIX 

フイツクス 

fix 

固定する 

FRE 

フリー 

free 

自由な 

HEX 

ヘックス，へキサ 

hexadecimal 

16進数の 

INKEY 

インキー 

input key 

キー入力 

INT 

1ンテジャー 

integer 

整数 

し EFT 

レフト 

left 

左 

し EN 

レングス 

length 

長さ 

し N 

ログナチュラル 

logarithm natural 

自然対数 

LOG 

ログ 

logarithm 

対数 

MID 

ミドル，ミッド 

middle 

中間の 

NOT 

ノット 

not 

〜でない 

OR 

オア 

or 

あるいは 

PAI 

パイ 

Pi 

円周率 

PEEK 

ビーク 

peek 

のぞく 

POINT 

ポイント 

point 

位置 

RAD 

ラジアン 

radian 

ラジアン 

RIGHT 

ライト 

right 

右 

RND 

ランダム 

random 

でたらめの 

SGN 

サイン 

sign 

符号 

SIN 

サイン 

sine 

正弦 

SPC , SPACE 

スペース 

space 

空間 

SQR 

スクウェアルート 

square root 

平方根 

STR 

ストリング 

string 

列 

TAB 

タブ 

tabulate 

表にする 

TAN 

タンジェント 

tangent 

正接 

Tl , TIME 

タイム 

time 

時間 

VA し 

バリュー 

value 

数値 

XOR 

イ クス クルーシブオア 

exclusive or 

排他的論理和 


表3 記号の読み方 



通 称 

J 1 S 名称 

好ましくない読み方 


スペース 

間隔 

空白 

| 

エクスクラメー ションマーク， 
ビックリマーク 

感嘆記号 

オッタマゲーシヨンマーク 

- 

ダブルクォーテーション（マーク） 

引用記号，ウムラウト 

上ちよんちよん 

# 

シャープ，ナンパー，井桁 

番号記号 


$ 

ダラー 

通貨 記号ドル 

エス 樺 

% 

バーセント 

パーセント 


&. 

アンパサンド，アンド 

アンド記号 



シングルクォーテーション(マーク） 

アポストロフィ，アクサンテギュ 

上ちよん 

( 

カッコ 

左小括弧 


) 

カッコ閉じ（る） 

右小括弧 


氺 

アスタリスク 

星印記号， 乗算 記号 

掛ける（演算内では可） 

+ 

プラス 

正記号，加算記号 

足す（演算内では可） 

, 

コンマ 

コンマ 

下ちよん 

一 

マイナス，ハイフン 

負 記号， 滅算 記号，ハイフン 

棒，引く（演算内では可） 


ピリォド 

ピリオド 

てん 

ン 

スラッシュ 

斜線，除算記号 

ななめ，割る（演算内では可） 


コロン 

コロン 

ちよんちよん，（たて）てんてん 

; 

セミコロン 

セミコロン 

ちよんコンマ，（たて）てんちよん 

< 

小なり 

不等号 （ より小） 


= 

イコール 

等号 

わ 

> 

大なり 

不等号 （ より太） 


? 

クエスチョンマーク 

疑問符号 

はてなマーク 

@ 

アットマーク 

単価符号 

エーマル，アルファ 

[ 

大カッコ 

左大括弧 


¥ 

円，円マーク 

通貨 記号円 


\ 

バックスラッシュ 


逆ななめ 

] 

大カッコ閉じ（る） 

右大括弧 


へ 

アッパーアロー 

上向き矢印記号，シルコンフレック 
スアクセント記号 

うえ山 

— 

アンダーライン，アンダーバー 

アンダライン 

下棒 


アクサングラーブ 

アクサングラーブ 

逆上ちよん 

1 

中カッコ 

左中括弧 


1 

パィブ 

分離記号，論理和記号 

たて棒 

1 

中カッコ閉じ（る） 

右中括弧 


— 

オーノ《ー ライン， オーノ ゞ ーノ<一 

オーバライン 

上 棒 

£ 

ポンド 

通貨 記号ポンド 

エル 棒 

〇 

句点 

句点 

まる 

、 

読点 

読点 

てん 

r 

カギカッコ 

始括弧 


j 

カギカッコ閉じ（る） 

終括弧 



中黒 

中点 

てん 

— 

長音記号 

長音記号 



濁点 

濁点 

てんてん 


半濁点 

半濁点 

まる 
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すべての道はショートに通じる 

入門 S 二 S ニプログラム 


Yoshida Kouichi 

吉田幸一 


BASIC に入門中の皆さん，どんなふうに勉強してますか？ 命令ばかり暗記してもだめ 
ですよ。小さなプログラムをたくさん作ってみること，それがいちばん効率的で楽しい方 
法です。そんな基本テクニックを集めたショートプログラム集。一緒に楽しみましよう。 


どんな巨大なプログラムも小さなプログ 
ラムの集合である。というわけで，ミニミ 
ニプログラムの作成に挑戦してみましよう。 
ここでは入門的なものからちょっと便利な 
プログラムまでを集めてみました。 

「 BASIC はまだ始めたばかりでよくわか 
んないよ一」という方。 BASIC を覚えるに 
は，とにかくプログラムを作ってみること， 
プログラムを読んでそれを理解すること力 ？ 
いちばんです。「テー マ」 を読み，「リスト」 
を打ち込み，「解説」を見て勉強してくださ 

い0 

「 BASIC は今勉強中」という方。まずは 
「テーマ」 だけを見て自分でプログラムを 
作ってみましょう。もしわからなかったら 
「解説 j を読んでもかまいません。それで 
もできなかったら「リスト」を入力してみ 
てください。掲載されている「リスト」は 
ひとつのプログラム例ですから，皆さんの 
作ったものと違うと思います。プログラム 
の仕方 • スタイルは人により千差万別です 
から，違っていて当然なのです。要は目的 
どおりの動作をするかどうかです。 

「 BASIC はだいたい マスター したぜい」 
という方。力だめしに「テーマ」だけ読ん 


でかたっぱしからプログラムを作ってみま 
しょう。きっと作れないものがあるはずで 
すよ。「リスト」と皆さんのプログラムが一 
致しないのは前述のとぉりです。応用を見 
て，バージョンアップに戦してみてくだ 
さい。 

それでは， Let’s program ! 

■ || テーマ 1四則演算 

まず手始めに， 2つの数 A と B を入力す 
ると，四則計算 （A + B ， A - B ， A * B ， 
A / B ), ぉよび A の B 乗 ( AAB ) の計算 
を行い，答えを表示するプログラムを作り 
ましょう。 B が0のときは A / B で エラー 
が出るので，チェックして出ないようにしま 
す。 

解説 

INPUT 文を2つ使って A と B の変数に値 
を入力し， PRINT 文で表示しています。ポ 
イントは B = 0のときの処理で，ここでは 
A / B のみ“フノウ”と表示します。また， 
入力した数が大きすぎると才ーバーフロー 
エラーが 発生しますが，ここでは無視する 
ことにします。 

このプログラムは.無限ループになってい 


ていつまでたっても終わらないので，止め 
たいときはブレークしてください。 

応用 

もう少し手を加えれば電卓代わりくらい 
には使えます。 

議|| テーマ 2三角関数 

今度は， A を入力するとその三角関数6 
種 ism , cos , tan , sec , cosec , cotan ) を計算 
して表示するプログラムです。面倒なので， 
分母が0の場合や才ーバーフロー時の処理 
はいらないものとします。 

解説 

入力した角度をラジアンに変換するため 
に50行を設けてあります。また，内部演算 
での誤差のため， cos 90° が0にならないな 


リスト2 三角関数 


10 

PRINT 

” 本 * 本サンカクカンスウ ♦ 本 *" 

20 

PRINT 

" カクト ■• ヲニユウ Vb クシテクタ • サイ " 

30 

PI=3. 1415927 

40 

INPUT 

.. カク r X= ";X 

50 

X=PI*X/180 

60 

PRINT 

, f SIN ( X )= " ； SIN ( X ) 

70 

PRINT 

H COS(X)= M ； COS(X) 

80 

PRINT 

'•TAN(X)= ”；TAN ⑴ 

90 

PRINT 

M SEC(X)= M ； 1/COS(X) 

100 

PRINT 

"COSEC(X)=" ； 1/SIN(X) 

110 

PRINT 

” COTAN(X)= H ； 1/TAN(X) 

120 

END 



リスト彳|四則演算 


10 

PRINT 

" 本本本カクシユケイサン本本 *” 

20 

PRINT 

"Ah 

B ヲイレテクタ * サイ ” 

30 

INPUT 

"A=" 

；A 

40 

INPUT 

••B= ” 

；B 

50 

PRINT 

"A+B = 

" ； A+B 

60 

PRINT 

"A-B = 

. ，； A_B 

70 

PRINT 

"A*B= 

• ，； A*B 

80 

IF B = i 

0 THEN 

PRINT ” A/B= フノウ •• ： GOTO 100 

90 

PRINT 

"A/B= 

";A/B 

100 

PRINT 

"A^B = 

" ； A A B 

110 

GOTO 

10 



リスト3 ||数の和 （1) _ 

10 PRINT " 本本本コ • ウケイヲタ • ス本本本 ” 

20 PRINT ”0 ヲニユウリ a クスルトコ '• ウケイヲケイサンシ 7 ス ” 
30 T=0 

40 INPUT "A= (or 0) 11 ;A 
50 IF A=0 THEN 80 
60 T=T+A 
70 GOTO 40 

80 PRINT • ， : 3* ゥヶィ =";T 
90 END 
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どおかしな結果が出ます。 

応用 

誤差を小さくするために上何桁かで丸め 
たり，オーバーフロー時は“フノウ”と表 
示させたりすればもっと実用的になります。 
頑張ってください。 

||テーマ3数の和 (1) 

数値をどんどん入力し，その和を出力す 
る プログラムです 0 〇 を入力すると入力要 
求をやめ，和と計算結果を出力するように 
しましよラ〇 

解説 

〇を入力するまで入力要求をするのがポ 
イントです。 

合計を入れる変数 T を用意し，入力され 
た数を次々と足していきます。0が入力さ 
れたか否かの判断は50行の IF 〜 THEN で行 
っています。これがない といつ までたって 
も結果は箱の中です。 

応用 

次の項を見てください。これの応用編に 
なっています。 

||テーマ4数の和 (2) 

前項と同じテーマです力\今回は結果を 
表示する際，一緒に計算式も表示させたい 
と思います。つまり，入力した数を保存し 


ておきたいわけです。たとえば，最初に入 
力した数が5，次が3，そして0が入力さ 
れたとき， 

5 + 3 = 8 

と出力したいのです。配列をうま〈使うの 
がポイントです。 

解説 

テーマ3と似ていますが，まったく違う 
構造になってます。大事なのは，変数の集 
まりである配列変数を40行で宣言し，50行 
で配列 A ⑴に数値を入力している点です。 
表示するときは FOR 〜 NEXT 文を使って， 
合計を計算しながら計算式を表示していま 
す。 ここが 「FOR J = 0 TO I 」でない点に 
注意してください。 

応用 

表計算をするにしろ，何にしろ，配列を 
うまく使わないと効率的なプログラミング 
をすることができません。さらに2次元配 
列を勉強して，表集計プログラムなどに挑 
戦してみてください。 

J ||テーマ 5英文作成 

英単語をひとつずつ入力していきます。 
そして，ピリオドを入れると，今まで入力 
した英単語をつなげて英文にするプログラ 
ムを作りましよう 0 入力は input 文1回につ 
き1単語を原則とします。 

例）？ This 

? is 
? • 

This is . 

解説 

文字列処理の基礎です。 
リストを見てわかるとお 
り，文字型配列に単語を 
入れます。表示するとき 
は スペース を挿入しなが 


ら表示すればよいのですが，最後の単語の 
あとに スペースは いらないので，そこだけ 
別にピリオドを付けています。 

応用 

得られた文をひとつの文字列変数に入れ 
ると文字列の マージが できます。 マージと 
いうのは，平たく言えば2つ以上のものを 
くっつけることです。 

||テーマ 6名字と名前 

前テーマと逆の作業です。氏名を入力す 
ると，それを名字と名前に分けて出力する 
プログラムを作りましょう。入力時には名 
字と名前の間にひとつスペースを入れるよ 
うにします。 INSTR 関数はいちおう使わな 
いでください。 

例）？ヨシダコウイチ 
ミヨウジ：ヨシダ 
ナマエ ：コウイチ 

解説 

ここでは文字列関数 MID $， RIGHTS , 
LEN と，派手に使っています。 MID $ でス 
ペースの位置を捜し， K $ に名字を，残りを 
RIGHTS で取り出して J $ に名前というよう 
に使っています。 

なお， テーマ 1のように一見無限ループ 
ですが， “ Z ” を入力1；ると終了するように 
なっている点で進歩が見られます。 

応用 

スペースの 数だけ分解できるようにすれ 
ば，英文を単語ごとに分けるといった芸当 
もできます。文字列処理の基本といえるで 
しょう0会話プログラムなどを作るときの 
重要なテクニックです。 

II テーマ 7統計 

少し実用的なものにす兆戦，ということで， 
各種統計計算をパソコンにさせてみましよ 


リスト 4 11 数の和 （2) 


10 PRINT "♦本本コ * ウケイヲタ*ス本本本 ” 

20 PRINT ”0 ヲ ニユウ リ b クスルト 、" 

30 PRINT " シキトケッ カヲヒヨ ウシ*シ マス，， 

40 DIM A( 100): T=0: 1=0 
50 INPUT "DATA: (or 0)";A(I) 

60 IF A(I)><0 THEN 1=1+1:GOTO 50 
70 FOR J=0 TO 1-2 
80 T=T+A( J) :PRINT A(J); ,, + "; 

90 NEXT J 

100 T=T+A(1-1) : PRINT A(I-1); M = M ; 

110 PRINT T 

120 END 


リスト 5 | | 英文作成 I / スト6 j ! 名字と名前 


10 PRINT " 本本本エイフ * ンヲツクル本本本 ” 


10 PRINT " 本本本ミ a ウシ * トナマエニワケル本本本 " 

20 PRINT " サイコ * ニヒ • リオト * ヲイレテクタ * サイ " 


20 PRINT " ミ b ウシ * トナ v エノアイタ * ニスへ • ースヲイレテクタ • サイ " 

30 DIM E$( 100) 


30 K$= ” ” ： N$=" M :J$="" 

40 N = 0 


40 INPUT "NAME= (or Z}";N$ 

50 INPUT ” WORD = ， ’ ； W$ 


50 IF N$ = ..Z.，THEN END 

60 E$(N)=W$ 


60 L=LEN(N$) 

70 IF W$><"THEN N=N+1 ：GOTO 50 


70 FOR 1=1 TO L 

80 » 


80 M$=MID$(N$,I I 1) 

90 PRINT 


90 IF M$> く •，” THEN K$ = K$+M$ ELSE 120 

100 FOR 1=0 TO N-2 


100 NEXT I 

110 PRINT E$(I) ； *' ”； 


110 GOTO130 

120 NEXT I 


120 J$=RIGHT$(N$ f L-I) 

130 PRINT E$(N-1> ;，，•，• 


130 PRINT ■. ミ s ゥシ - : ° ;K$ 

140 END 


140 PRINT •，ナマエ ： •• ； J$ 



150 GOTO 30 
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う。入力形式はテーマ4と同じにします。 

各種といっても統計計算にはいろいろあ 
るので，ここでは以下の3つについて行っ 
てみてください。 

1 ) 平均 

2) 分散 （2 A ( I) 2 )+N — M 2 

つまり，（入カデータを2乗したものの和） 
+ ( データ数）一（平均) 2 

3) 標準偏差/ (6 m )~ 

解説 

テーマ4の要領で次々とデータを入力し 
ていき， 0を入れると計算を始めます。 

統計計算についての詳しくは専門の本で 
も見てください。大事なのは計算式ではな 
く，前の6つよりグンと実用的になった点 
です。 

応用 

ついでですから，不偏分散を求めたり度 
数分布図を描いたり，調和平均や変動係数 
が求まるようにしてみてはいかがでしよう。 

く ||テーマ日三角形の面積 

いく通りかの方法で三角形の面積を求めて 
みましよう。というだけでは抽象的なので， 
底辺と高さ，3辺の長さ，2辺とその間の 
角のどれかがわかっていれは一面積が得られ 
るようにします。 

入力は，まず3つのどの方法で求めるか 
を選んでからデータを入れる、としたほう 
が楽ですね。ちなみに，計算式は下の2つ 
でこと足ります。 

1 ) 底辺 X 高さ+2 
2 ) ヘロンの公式 
面積 = ゾ s ( s — a)(s — b)(s — c ) 


( a , b , c は辺の長さ， > 

2 辺とその間の角から求めるには，三角 
関数を使います。 

解説 

底辺と高さを入力したときについては言 
うまでもないですね。 3辺の長さから求め 
るにはへロンの公式 

面積 =/ s ( s — a)(s — b)(s — c ) 
s = (a + b + c )/2 

を使います。2辺とその間の角から求め 
るには，三角関数を使って底辺と高さの式 
で求まるように変換しています。求め方の 
選択は， ON 〜 GOSUB 文を使って適当なサ 
ブルーチンを呼んでいます。 

応用 

これをさらに発展させ，平行四辺形や円 
の面積も求まるようにしたらおもしろいの 
ではないでしようか。 

||テーマ 9 ソー ト(並べ換え） 

いくつかの数を入力すると，小さい順(昇 
順）に並べ換えて表示するプログラムを作 
りましよう。いわゆるソートです。 

入力はテーマ4と同じにします。ソート 
の方法はいろいろあります力 ? ，ここでは簡 
単な「隣の数と比べて逆にする必要があ 
れば2つをひっくり返す」ことを繰り返す 
方法をとります。配列の初めの方から順に 
小さい数が入っていくようにしてみてくだ 
さい。 

解説 

配列の中からいちばん小さい数を見つけ 
ていちばん前に，2番めに小さい数を2番 
めに……としてソートしています。あと 


特集 BASIC “行動学”入門 

は N ( 0) から順に表示するだけです。80行の 
“< =”を“にすると大きい順（降 
順）にソートします。 

応用 

10個や20個のソートならこれでもいいの 
ですが，100個や1000個のデータをソートす 
るとなるともっと早い方法はないのか！ 

と言いたくなります。というわけで，次の 
項でもう少し速いソートを紹介します。 

||テーマ10シェルソート 

テーマ9の内容をシェルソートという方 
法で行ってみましょう。 

シェルソートというのは有名なわりにい 
まひとつ説明しづらいので，知らない人は 
プログラムをカンニングしてください。作 
られたプログラムの解読もひとつの勉強で 
す。 

解説 

シェルソートは別名跳び跳びソートとも 
言われ，比較的速いソートとして有名です。 
適当な数を入れてトレースしてみる（流れ 
を追ってみる）とわかります力 ? ，なぜかこ 
れでソートができてしまうのです。プログ 
ラムの途中で,変数 ST や L , 配列の内容な 
どを表示させると流れを追いやすいと思い 
ます。 

応用 

住所録など大量のデータ処理を行うとき， 
五十音順や電話番号順などのソートが必要 
となります0こういったときに シェルソー 
卜は威力を発揮するのです。サブルーチン 
としてのほかのプログラムに応用してみて 
ください。 


U スト7 ||統計計算 リスト8 ||三角形の面積 


10 PRINT ”♦ 本本トウケイケイサン本本本 ” 


10 PRINT "本本本サンカクケイノ メンセキ本本本 " 

20 PRINT " 1: テイヘントタカサカ * 7 カツテイル ” 

20 PRINT "0 ヲニユウリ b クスルト 、’’ 


30 PRINT ” 2:3 ヘンノナカ * サカ * ワカツテイル ” 

30 PRINT •• ケヮカヲヒ日ウシ • シマス " 


40 PRINT ” 3:2 ヘンノナカ • サトソノアイタ * ノカクカ • ワカツテイル ” 

40 DIM A( 100) ： T=0 ： T2=0:I=1 


50 INPUT "(1-3) ，，； N:IF 0>N OR N>3 THEN 50 

50 INPUT ” DATA: (or 0)" ； A(I) 


60 ON N GOSUB 90 ， 130，190 

60 IF A(I)><0 THEN Irl+l：GOTO 50 


70 PRINT " メンセキ ="；S 

70 M=I-1 


80 GOTO10 

80 FOR J=1 TO N 


90 1 No.1 

90 T=T+A(J) 


100 INPUT '• テイヘン ="；L 

100 T2=T2+A(J) 木 A(J) 


110 INPUT " タカサ ="；H 

110 NEXT J 


120 S=L*H/2：RETURN 

120 M=T/N 


130 » No.2 

125 S2=(T2-T*T/N>/N 


140 FOR 1=1 TO 3 

126 S=SQR(S2) 


150 PRINT " ヘン ” ； 1;，.= •，；： INPUT HL(I) ： P=P+HL(I) 

130 PRINT ” 本本本本本本本本本本本本本本本本本本拿本本本本本本本本本本 ” 


160 NEXT I 

140 PRINT " ソウコスウ :：”； N 


170 P=P/2:SiP*(P-HL(l))*(P-HL(2))*(P-HL(3)) 

145 PRINT ” ソゥヮ =" ;T 


180 S = SQR ⑻： RETURN 

146 PRINT ” ヘイキン =，，： M 


190 f No.3 

148 PRINT " フ * ンサン =，，；32 


200 INPUT ，，ヘン 1=";L1 

149 PRINT ’’ ヒ s ウシ * ユンヘンサ =”；S 


210 INPUT " ヘン 2 = ” ； L2 

150 PRINT " 本本本本 ** 本本家 * 本 * 本本 ** 掌本本本本本本本本本本本 *" 


220 INPUT "カクド = M ；R 

160 END 


230 R=3.1415972/180*R:H=L2*SIN(R) 



240 S=Ll*H/2:RETURN 
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II テーマ 11 俳句を詠む 

日本語処理の第一歩 (？） として，パソコンに 
俳句を詠ませてみましょう。5,7, 5であれ 
ば文字は乱数発生でよい。 

ここでは，あらかじめ DATA 文にア〜ン 
の45文字を入れておき，それを READ 文で 
配列に読んで，ランダムに出力するといっ 
た方法をとります。 

解説 

今回はデータ文にア〜ンを入れて使用し 
ました。 READ 文で勝手に DATA 文中のデ 
ータを順に読んでくれるので，あとは FOR 
〜 N E X T をデータの数だけ回し配列に突っ 
込んでやれば，あとはいつでも呼び出せま 
す。そして， RND 関数と INT 関数を使い0 
〜44の整数をランダムに発生させ，それに 
対応する文字を表示しています。これを F 
OR 〜 NEXT を使って5文字， スペース， 7 
文字， スペース， 5文字と書けば俳句の完 
成です。 

応用 

簡単な応用としては， DATA 文中に濁音， 
半濁音（ガやパ）を入れる， READ 〜 DATA 


を使わずに CHR $ 関数を使う，などがあげ 
られます。少し高度なものとしては，日本 
語の文章を研究して使用頻度の高さを考慮 
して文字を発生させれば多少日本語らしい 
文が作れるかもしれませんね。 

||テーマ 1210進 — n 進変換 

10進法で入力した数を任意の進数 （3 進 
や15進）に変換して出力するプログラムで 
す。当然、11進数以上に変換するときはァ 
ル ファ ベットも使うことにします。 

まず何進に変換したいかを入力したあと， 
変換もとの10進法を入れるようにしましよ 
う。 n 進数の意味を知らない人は……調 
ベてください。 

解説 

こういったプログラムの アル ゴリズムは 
たいへん重要なので，しっかり理解してく 
ださい。たとえば，10進の38は38を10で割 
った余り（つまり 8) とその商を10で割っ 
た余り（つまり 3) を右から順に書いたも 
のと考えます。この調子で38を8進にして 
みると，38を8で割った余り6とその商4 
を8で割った余りで46，となるわけです。 


この作業を80〜150行で行っています。 

このプログラムのもうひとつのポイント 
は CHR $を使っている点です。 CHR$(&H 
30) は数字の“ 0”， CHR $(& H 41) は“ A ” で， 
このほうが11進以上でアルファベットを使 
いたいときに便利なうえ，文字列として処 
理すると前に書いた「右から順に書く」と 
きに都合がいいのです。 

応用 

もっと実用性を上げるには， n 進 ㈠ n 進 
変換ができるように機能アップするなり， 

2進〇10進—>16進変換表を作ってプリント 
アウトしてはいかがでしよう。 

_||テーマ13 5二 S 二 電話帳 

名前から電話番号を検索するミニミニ電 
話帳を作りましょう。名前と電話番号はあ 
らかじめ DATA 文中に入れておくことにし 
ます。 

名前を入力すると，その人のフルネーム 
と電話番号を表示するようにします。名前 
の入力は名字でも頭文字だけでもよいよう 
にし，その場合は該当する人すべてを表示 
します。 
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解説 

最初の FOR 〜 NEXT ブロックで名前を全 
部配列にしまい， Z を読むと次の FOR 〜 N 
EXT ブロックへ行き，電話番号を配列に取 
り込みます。つまり， N $(0，1)の人の電話 


ータファイルを消してから，書き込みモー 
ドでファイルオープンし，配列の内容をす 
ベて PRINT #1 でデイスクあるいはテープ 
に書き込んでいます。最後に“ *** ”を 
書いているのは，データロード時にデータ 


終了を知らせるためです。 

かくして ， DATA ロードモードです。こ 
こでは読み込みモードでファイルを才ープ 
ンし，“ホ**”が見つかるまで配列に読み 
込んでいます。この際， I に最後のデータ 


番号は N $(1，1)なわけです。 

次に検索ですが，ここでは入力した文字 
列と同じ文字列で始まる名前を捜すように 
なっています。たとえば“イ”を入力する 
と，イトウ〜イチカワの2人が，“イト”と 
入力するとイトウが検索されるのです。 
応用 

簡単なところでは，検索した結果をプリ 
ントァウトして使ったり，年齢や住所など 
のデータも入れて汎月]性を上げたりすれば 
もう少し実用的になりますね。 

||テーマ14 5二 電話帳 

テーマ13を拡張し，シーケンシャルファ 
イルを使ったミニ電話帳を作ってみましよ 
う。データは前と同じく名前と電話番号だ 
けにし，メニユーは 

1 . DATA ニユウリョク（ツイカ） 

2 . DATA サンショウ 

3 . DATA SAVE 

4 . DATA LOAD 

5 . END 
とします。 

解説 

今までのものと比べるとかなり長いプロ 
グラムですが，その分丁寧に解説しますの 
でご了承を。 

初めて使うときは “ DATA ” という名前 


リスト14ミニ電話帳 


10 PRINT "拿本拿ミニアト * レスフ * ック拿拿 *" 

20 DIM NT$( 1,100) 

30 PRINT " 1: DATA ニ ユウ リ • ク（ツイ カ >" 

40 PRINT "2:DATA ケンサク ” 

50 PRINT "3：DATA SAVE .， 

60 PRINT "4:DATA LOAD" 

70 PRINT "5:END ，， 

80 INPUT "(1-5) M ； M：IF (M<1)+(M>5) THEN 80 
90 ON M GOSUB 110,170,260,350,420 
100 GOTO 30 
110 ， DATA 三ュゥリ b ク（ツイカ） 

120 INPUT "NAME (or Z) : ";N$:IF N$ = . ， Z" THEN 160 
130 INPUT M TEL : ” ； T$ 

140 I=I+1 ： NT$(0,I)=N$ ： NT$(1,I)=T$ 

150 GOTO120 
160 RETURN 
170 f DATA サンシ b ウ 

180 INPUT "NAME(or Z) : ";N$:IF N$=”Z” THEN RETURN 
190 L=LEN(N$) 

200 FOR J=1 TO I 

210 IF L>LEN(NT$(0,J)) THEN 240 

220 IF LEFT$(NT$(0, J) ,L)XN$ THEN 240 

230 PRINT " ナマエ： " ； NT$(0,J):PRINT "TEL : ";NT$<1,J> 

240 NEXT J 
250 GOTO180 
260 * DATA SAVE 
270 KILL "DATA" 

280 OPEN "O" ,#1 ,"DATA” 

290 FOR J=1 TO I 

300 PRINT #1,NT$(0,J) ； ", H ;NT$(1,J) 

310 NEXT J 

320 PRINT #1,"***，***” 

330 PRINT "COMPLETED .， 

340 CLOSE #1：RETURN 

350 1 DATA LOAD 

360 OPEN "I" ,#1 ,"DATA" 

370 FOR J=1 TO 100 

380 INPUT #1 f NT$(0,J),NT$(1,J)：IF NT$(0,J }=”》 本本 " THEN I=J-1 ： J=100 
390 NEXT J 

400 PRINT ” COMPLETED" 

410 CLOSE #1 : RETURN 
420 END 

• S-BASIC 用 変更 点 

270 DELETE "DATA” 

280 WOPEN# 1,..DATA" 

360 ROPEN# 1, ，， DATA" 


のファイルをひとつ作ってお 
いてください。そうしないと 
270行の KILL 文でエラーが出 
ます。 

さて， DATA 入カモードで 
す。ここでは，名前と電話番 
号を配列に読み込んでいます。 
あらかじめデータがロードさ 
れているときは， I に最後に 
入力したデータの番号が入っ 
ているので，このルーチンで 
データ追加ができます。 

DATA 参照モードは前項と 
同一なので省略するとして， 
DATA セーブモードへと話は 
移ります。ここでは，元のデ 


リスト13ミニミニ電話帳 


10 

PRINT " 本拿本ミニミニアト • レスフ • ック拿拿零 " 


20 

DIM N$(1,100) 


30 

FOR 1=0 TO 100 


40 

READ NA$：IF NA$="Z" THEN 70 


50 

N$(0,I)=NA$ 


60 

NEXT I 


70 

FOR A=0 TO 1-1 


80 

READ NA$:N$(1,A)=NA$ 


90 

NEXT A 


100 

i 


110 

PRINT " ナマエカラ TEL No. ヲケンサクシマス " 


120 

PRINT n Z ヲイレルトオワ V マス " 


130 

INPUT "NAME = " ； NA$ 


140 

IF NA$="Z" THEN END 


150 

NL=LEN(NA$) 


160 

FOR A=0 TO 1-1 


170 

IF NL>LEN(N$(0,A)) THEN 200 


180 

IF LEFTS(N$(0,A),NL)><NA$ THEN 

200 

190 

PRINT " ナマエ : M ； N$(0,A) : PRINT "TEL : ";N$(1,A) 

200 

NEXT A 


210 

GOTO130 


220 

DATA ヨシタ * 3 ウイチ , イス * ミタ * イスケ，，トウアキラ， 

イ 7 イイツへ • イ，シミス * カス • 卜，コウモトヤスヒコ，サトウ 7*3,Z 

230 

DATA 0423-85-0000,03-383-0000,0486 

-25-0000,03-265-0000,06-583-0000,052-771 

-0000, 

,0422-47-0000 
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が入った配列の番号を代入しています。 

このように外部記憶装置にデータを保存 
するとメリットがたくさん出てきます。デ 
ータの追加の楽なことや，何本もメディァ 
(テープやディスク）を用意すれば，それぞ 
れ違った種類のデータに使えることです。 
応用 

今回は100件までしかデータが入りませ 
んが （20 行）もっとたくさん入るようにし 
たり，データの訂正やプリントァウトがで 
きるようにするともっと実用的になるでし 
ょラ〇 

また，フロッピーディスクをお待ちの方 
はランダムアクセスファイルに挑戦してみ 
てください。 

_||テーマ 15四角形を描< 

ちょ っ と固い テーマが 多く なって しまい 
ました。ここらで柔らかい話題に テーマを 
移しましょう。 

任意のキャラクタで，一辺の長さが任意 
の正方形を描くプログラムです。 

たとえば，1辺の長さが5でキャラクタ 
が@と入力すると，1辺に@が5個並んだ 
正方形が表示されるようにしてください。 
解説 

これは，グラフィック機能を使わずに図 
形を描くときの基本です。プログラムは簡 
単なのでたいして説明の必要はないでしょ 
う。 FOR 〜 NEXT 中で，入力したキャラク 
夕をその数に応じて表示しているだけです。 
PRINT 文中にある SPC は引数の数だけスぺ 
ースを書くための命令で PRINT 文中でしか 
使えません。 

応用 

三角形や大きな文字を書くことも A 然で 


きます0ゲームのタイトルなど，派手な字 
を書きたいときに，キャラクタを並べて字 
を書く方法はたいへんよく使われます。 

II テーマ 16お絵描吉 

力ー ソル キーを使って，任意のキャラク 
夕で絵を描くプログラムを作りましよう0 
カーソル 位置は常に画面の左上に表示する 
ようにします。 

カーソル キーを押すと，その方向に画面 
に出ているキャラクタを表示します。また， 
A キーを押すと A が表示されるようにしま 
す。たとえば， A を押して「―」キーを押 
すと，その位置から AA A ……と カーソル 
を離すまで描き続けるわけです。 

解説 

言うまでもなく，前テーマの応用編です。 
70行でゲームによく使う INKEY $ 関数を使 
っていますが，この関数にはそのときに押 
されていたキーが入っています。何も押し 


てなければ“”が入ります。そして80〜110行 
でカーソル位置を計算し，120行で表示す 
る文字を決めているわけです。グラフィツ 
ク エディ タの原生動物みたいなものですね t 

応用 

とにかく ゲームに 使えます。自分の戦闘 
機を動かしたり，敵機を動かしたりはたい 
ていこれが基本です。 

圍||テーマ 17パソコンオルガン 

キーを押すと音が鳴る，つまり パソコン 
をオルガンのように使ってみましよう〇出 
力は1オクターブのみで，キーボード上の 
「 Cj をドとします。 

解説 

C をドとし1オクターブ上のドまで音が 
出るようになっています0アルゴリズムは 
いたって簡単。どのキーを押したかの判定 
は，使う13個のキーをあらかじめ KB$C 
入れておき （10 行），80〜100行で，押され 


リスト16 お絵描き 


10 

CLS 





20 

X=20:Y=10 





30 

B$="+" 





40 

LOCATE 0,0: PRINT .， 

> 




50 

LOCATE 0,0: PRINT ”X= ，，； X ;，， Y=.，；Y 





60 

LOCATE X,Y：PRINT B $； 





70 

A$ = INKEY$：IF A$ = .，，，THEN 70 





80 

IF A$=CHR$(30) AND Y>1 THEN Y=Y-1 





90 

IF A$=CHR$(31)AND Y<18 THEN Y=Y+1 





100 

IF A$=CHR$(29) AND X>0 THEN X=X-1 





110 

IF A$=CHR$(28) AND X<38 THEN X=X+1 





120 

IF ASC(A$)>31 AND ASC(A$)<128 THEN 

B$ = A$ 




130 

GOTO 40 





• 5- BASIC 用変更点 





10 

PRINT CHR$(6) : , K/C シリ 

-ス * ハ CHR$(22) 



40 

CURSOR 0,0：PRINT " 

1 




50 

CURSOR 0,0：PRINT "X=";X;" Y="；Y 





60 

CURSOR X,Y:PRINT B$; 





70 

GET A$ ：IF A$ 二 ，". THEN 70 





80 

IF (A$=CHR$(2))*(Y>1)THEN Y=Y-1 


， K/C 

シ V' ■ ス•ハ 

CHR$(18) 

90 

IF (A$=CHR$(1))*(Y<18) THEN Y=Y+1 


， K/C 

シリ '• ス•ハ 

CHR$(17) 

100 

IF (A$=CHR$(4))*(X>0) THEN X=X-1 


， K/C 

シ V - ス*ハ 

CHR$(20) 

110 

IF (A$=CHR$(3))*(X<38) THEN X=X+1 


， K/C 

シ V- ス'"八 

CHR$(19) 

120 

IF (ASC(A$>>31>»<ASC(A$> く 128> THEN 

B$=A$ 





I スト15四角形を描く 


リスト 17 パソコンオルガン 




10 DIM P$(13>:KB$=”CVBNM,./FGJKL” 

20 PRINT ” 本本本ハ • ソ :i ンオルカ '* ン本本本 ” 

10 PRINT % 'ttt 4 カクケイ拿家本 " 


30 FOR A=1 TO 13 

20 INPUT ”1 ペンノナカ•サ = "jN 


40 READ A$ ： P$(A)=A$ 

30 IF N>20 THEN 20 


50 NEXT A 

35 INPUT " キャラクタ - <1 モシ ” ： ” ； N$ 


70 I$ = ， ’" ： I$ = INKEY$:IF 1$ = .". THEN 70 

36 IF LEN(N$)>1 THEN 35 


80 FOR A=1 TO13 

40 FOR 1=1 TO N 


90 IF I$=MID$(KB$,A,1)THEN 110 

50 PRINT N $； 


100 NEXT A : GOTO 70 

60 NEXT I 


110 PLAY P$(A) 

70 PRINT 


120 GOTO 70 

80 FOR 1=1 TO N-2 

90 PRINT N$;SPC(N-2);N$ 

100 NEXT I 


130 DATA 04C 8,04 D 8,04 E 8,04 F 8,04 G 8,04 A 8,04 B 8,05 C 8,04 C+ 8,04 D+ 8,04 F+ 8,04 G+ 8,04 A+8 

110 FOR 1=1 TO N 

120 PRINT N $； 


• S-BASIC 用変更点 

130 NEXT I 


70 1$ = ’"•： GET 1$ ：IF 1$=."， THEN 70 

140 END 


110 MUSIC P$(A) 

130 DATA C3,D3,E3,F3,G3,A3 t B3 f +C3,#C3,#D3,#F3,#G3,#A3 
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たキーが KB $ の中にあったかどうか捜す 
ことによってなされています。配列 P $に 
鳴らす音のデータが入れてあるので， KB $ 
の5番目 （“ M ”） が押されたら P $(5)(“04 G 8” 
つまりソの音）を鳴らしてやればよいので 
す。 

さまざまな欠点をかかえつつも，けっこ 
う遊べるプログラムになっています。 

応用 

パソコンを シンセサイザのように使う 
試みは昔からなされてきました。 BASIC で 
もかなりのことができますが，本格的に使 
おうと思うとマシン語の世界に足を踏み入 
れざるをえません。どうしましょう。 

■ II テーマ18サイコロ 

サイ コロのシミ ュ レーシヨンを してみ ま 
しょう。できれば出た目のビジュアルな表 
現をしたいですね。 

スペースを 押すとサイコロが振られるよ 
うにします0ビジュアルな表現といっても， 
テーマ 15のようにキャラクタを並べて絵を 
描く程度でいいでしょう。 

解説 

これは乱数発生とテーマ15のグラフイッ 


ク表現に加え， INKEY $ と ON 〜 GOSUB を 
組み合わせたものです。 

見てのとおり， スペース キーを押すとサ 
イコロが振られ，画面に出た目が表示され 
ます。絵はサブルーチンで描いており，乱 
数で出た値によって， ON 〜 GOSUB 文でそ 
の目を描くサブルーチンを呼んでいるので 
す。 

応用 

スゴロクに使うよりも，今はやりのアド 
ベンチヤーゲームブック用に使えそうです0 
ゲームに応じて，一度に2つサイコロを振 
ったり，戦闘力を計算したりするのはいか 
がでしょう。 

III テーマ〗 g 早押しゲー厶 

最後はキーボードの早押しゲームです。 
ルールは 簡単。 A から Z までを順に押し， 
押し終えるまでにかかった時間を表示する 
ものです。 「 A 」 を押したらタイマーがスタ 
一卜するようにして正確に判定しましょう。 
解説 

「 A 」 を押した時点でタイマーがスタート 
し， Z を押した時点でかかった時間を表示 
します。筆者のベストタイムは今のところ 


特集 BASIC “行動学”入門 

5秒です。5秒の壁は厚い。ちなみに，7 
秒でできれば速いほうでしょラ。単純なわ 
りに熱中できるのがこれの特徴です。 

プログラムですが，難しいことはしてま 
せん。 CHR $(& H 41) が“ A ”， CHR $(& H 5 A ) 
が“ Z ”だと覚えておけばすぐにわかるでし 
ょ 

応用 

打つ英字を英単語にしたり BASIC の命令 
にすれば，タイピング練習プログラムとし 
ても使えます。 


以上，ミニミニプログラム集はいかがだ 
ったでしょうか。日頃気付かなかった新し 
い発見もあったのではないでしょうか。今 
は必要ないと思ったプログラムでも，あと 
で意外なところで役に立つことがあるかも 
しれません。 

どんなに大きなプログラムも，小さなプ 
ログラム，小さなルーチンから成り立って 
います。また， BASIC は小さなプログラム 
をちょこちょこといじって遊ぶのには最適 
な道具です。 BASIC を勉強する， BASIC •で 
遊ぶ，大きなプログラムを作る，すべては 
ショートプログラムから始まります。 


” ス H8 || サィ コロ _ リスト19||早押しゲーム 


10 

PRINT 


サイコ 13 

1 シ 5 ユレーシ B ン - " 




20 

PRINT 

"HIT 

SPACE BAR” 




30 

I$=INKEY $： 

IF 1$ バ "，’ THEN 30 




40 

S=INT(RND(1)*6)+1 



10 PRINT " 本拿本ハヤオシケ * - 厶本本本 " 

50 

PRINT 

" 本窣拿本拿拿 :!: 拿本 "： PRINT "* 



20 PRINT " A-Z ノキーヲシ • ユンニオシテクタ * サイ ” 

60 

ON S GOSUB 

90 ， 130 ， 170,210,250, 

,290 


30 PRINT "ABCDEFGH I JKLMNOPQRSTUVWXYZ M 

70 

PRINT 

，，本 


: PRINT " 本本本本拿本拿本本 " 


40 IF INKEY$OCHR$(65) THEN 40 

80 

GOTO10 





50 TIME$ = ，， 00:00:00" 

90 

» 1 






60 PRINT "A "； 

100 

PRINT 

，，本 


拿 ”： PRINT "* 1 

1 *，• 


70 FOR 1=66 TO 90 

110 

PRINT 


— 

*"：PRINT "本 1 

> *，• 


80 A$=INKEY$ 

120 

PRINT 

，•本 


本 "： RETURN 



90 IF A$OCHR$(I) THEN 80 

130 

* 2 






100 PRINT CHR$(I )； 

140 

PRINT 

" 本 # 


: PRINT n 本 

拿，， 


110 NEXT 

150 

PRINT 

，•本 


*"：PRINT "本 

本.， 


120 PRINT：PRINT TIME$ 

160 

PRINT 

，.本 

• 

*•' : RETURN 



130 END 

170 

, 3 







180 

PRINT 

" 拿 • 


*'* ： PRINT "本 

零，， 



190 

PRINT 

.•本 

• 

本 "： PRINT "本 

本.， 



200 

210 

PRINT 
» 4 


• 

本 ，•： RETURN 



• S-BASIC 用 変更 点 

220 

PRINT 

" 本 # 

• 

拿 ”： PRINT "* 




230 

PRINT 

.，本 


* H ：PRINT "本 

*•， 


40 GET I$：IF I$OCHR$(65) THEN 40 

240 

PRINT 

"拿 • 

• 

* .，： RETURN 



50 TI$= u 00 ： 00 ： 00" 

250 

» 5 






80 GET A$ 

260 

PRINT 

" 拿 # 

• 

*" ： PRINT u * 

拿 , ， 


120 PRINT：PRINT TI$ 

270 

PRINT 

，•本 

• 

本 "： PHINT "本 

拿，， 



280 

PRINT 

" 本 # 

• 

本 "： RETURN 




290 

* 6 







300 

PRINT 


• 

*" ： PRINT "本 

本 , ， 



310 

PRINT 

"本參 


* M ： PRINT "* 

本 , ， 



320 

PRINT 

" 本 # 

• 

*" : RETURN 




• S-BASIC 用 変更 点 





30 

GET I$：IF 

1$><" 

1 ，， THEN 30 
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雑誌のプログラムを完動させる 

必殺バグ退治のテクニック 


Asano Keizo 

浅野恵造 


雑誌に掲載されているプログラムを入力して正しく動作させる。簡単そうでいて，じつ 
は難しいことですね。入カミスさえしなければよいのですが，やっぱり打ち間違ってしま 
います。それらを効率的に直すためのデバッグのテクニックを勉強しましょう。 


Oh ! MZ の読者（別に Oh ! MZ に限りません 
が）の皆さんは，多かれ少なかれ雑誌に掲 
載されているプログラムリストを自分のパ 
ソコンに入力された経験がおありだと思い 
ます。さて，そこで質問ですが，そのプロ 
グラムは一度で正しく動いたでしょうか？ 
まあ多くの方の返事は 「 NOj だと思います。 
中には 「 YES 」 と自信を持って答えること 
のできる方もいるでしょうが，そうでない 
多くの方はこの講座をぜひ参考にしてくだ 
さぃ。 

さて，次なる質問です。「 N 0」と答えら 
れた方は最終的にそのプログラムを正常に 
できたでしようか？これに対しては 「 YES 」 
という方も多いと思いますが，中には 「noj 
と小文字で小さく答えられた方もいらっし 
ゃると思います。そんな方も，この記事を 
読んでいただければもう安心。これからは 
今まで諦めていたような長いリストも無事 
に入力できるようになります。 

ザ||ど5して正常に動かないのか 

入力したプログラムが正常に動かない原 
因としてはいろいろ考えられます。操作ミ 
ス，入カミス，プログラム自身の間違いや 
機械のトラブルなどです。操作ミスという 
のは，違うキーを押したりしてしまうこと 
によるもので， CAPS キーやカナキーが口 
ックされていたり，数字と文字の間違いな 
どによることが多いようです。これは，プ 
ログラムに ついての 説明をよく読めば解決 
することであり，プログラム自身にそうし 
た誤操作への配慮が払われるべきことなの 
で別の機会に譲ります。また，プログラム 
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自身の間違いというのもひとつの大きな問 
題ですがここでは触れません。したがって， 
雑誌に掲載されているリストは完璧である 
(この 点に ついて異議を唱える方も 若干い 
ることと思いますが私は関知しない）とい 
う前提のもと，入カミスをいかに発見しど 
う修正していくかについての方法を述べた 
いと思います。というのは，きちんとした 
入カチェックをする前からプログラム自身 
を疑ってしまっては，永遠に完動させるこ 
とはできないからです。 

|リストの正しい入力法 

第1段階としては，入力をいかに正しく 
行うかということです。話の本筋は入カミ 
スの修正ですが，早い話が入カミスがなけ 
ればそんな心配はいらないわけですから， 
まずできるだけ入力を正確に行うためのエ 
夫を考えてみます。 

1) 入力を共同で行う 

これは私も実践していますが，ひとりに 
リストを言売み上げてもらい，もうひとりがキ 
ーボードを叩くという方法です。ブライン 
ドタイプができる人はこんなことをする必 
要はありませんが，キーボード操作に慣れ 
ていない 場合（キーボードを見ながら打つ 
人〉には特に有効です。リスト，キーボー 
ドそしてデイスプレイと視線を移動させる 
とどうしても文字の見間違いや見落としがあ 
るものです0この場合のパートナーは BASIC 
などパソコン について知っている 人のほうが 
楽でしようが，とりあえずアルファベット 
が読める人であればかまいません。できれ 
ばコマンドや記号がきちんと読めるほうが 


いいので，『音読講座』で勉強することを 
おすすめします。 

2) 何回かに分けて入力する 

これは，ある程度長いリストになると途 
中で疲れてしまい必然的にそういう結果に 
なってしまうことです。しかし，意識的に 
分割して入力していくと間違いが減ると思 
います。区切りは行番号によってでもルー 
チンごとでもかまいません。人間は パソコ 
ンと違い長時間作業をすると疲れてミスも 
増えるので，作業を細かくすることで集中 
力がアップします。また，分割した区切り 
ごとにそのつど セーブして おけば，停電， 
暴走その他の不測の事態にも対応できるな 
どの効果があります。 

以上のほかにも人により自分に合った入 
力法があるでしよう。要は入力という単調 
作業に伴うミスを少しでも減らすようにエ 
夫することです。 

入力のとき打ち間違いやすい文字は，形 
の似ているものとして1と I と1，：（コ 
ロン）と；（セミコロン）， . （ピリオド） 
と，（カンマ）， 0 (ゼロ）と0 (オー〉な 
どがありますので特に注意してください。 
それから，キーボード上で隣り合っている文 
字， M と N ， V l ： B ， R と T ， Y と U など 
も比較的打ち間違いが多いようです。 

さて，上のような間違い（勘違い）は誰 
でも起こし得るわけです力 5 '，これとは別に 
多少 BASIC などの知識がある人にある入力 
ミスとして思い込みや勝手な解釈によるも 
のがあります。これは入力の際に多少の知 
識があるばかりにリストで間違いと思われ 
る部分，あるいは省略可能と思われる部分 












を自分の判断で行ってしまうために起こる 
ものです。たとえば， DATA 文の，（カン 
マ） の 省略，変数名の短縮， パラメータの 
省略， スペースの 省略， REM 文や PRINT 
文中の変更や省略などといったものです。 
こうしたことは慎重に行わないと，一見し 
て正しいようでもプログラム全体で違う動 
作をしてしまうなどという，発見しづらい間 
違いとなる可能性があります。自分では正 
しいと思い込んでいるだけに大変です。で 
すから，最初はリストどおり （ 一■字-句違 
わず）入力することをおすすめします。正 
常な動作を確認した上で自分に合うように 
改造すればよいのですから。 

ただし， BASIC の知識があるに越したこ 
とはありません。 コマンド や パラメータの 
入カミスは大幅に少なくなります。ただ， 
その知識をむやみに振り回さないことが大 
切なのです。 

,||走らない！さあど5するか 

RUN する前のセーブはもう習慣になって 
いますか？ というわけで，今までのは序 
論として，いくら必死に入力しても間違い 
はあるものですから， これ からは間違い 
(バグ： bug ) を直す（デバッグ： debug ) 実際 
の アプローチについて 見てみましよう。 

バグがある場合のプログラムの動作とし 
ては2通りあります。ひとつはビープ音（「ブ 
一」， 「ピ ー」， 「ポッ」 etc .) と同時にプログ 
ラムの実行が止まり，エラーメッセージが 
表示される場合，もうひとつはエラーは出 
ないものの動作が異常（暴走も含むが BAS 
1 C プログラムでの暴走は少ない）な場合で 
す。後者のデバッグは多少難しいのであと 
で説明することにして，まずエラーメッセ 
ージが表示された場合のデバッグを考え 
ます。 

エラーメッセージというのは，コンピユ 
ータが実行できないような命令を与えられ 
た場合，どういった種類の間違いかをユー 
ザーに知らせるメッセージで ， 「Syntax 
error in 100」のようなものです〇これが 
BASIC インタプリタが対話型の言語である 
という点でもありますが，ビープ音ととも 
に予告なく現れるこのメッセージは，私に 
はケンカを売られているとしか思えず，と 
ても対話などという気分はしません。それ 
はともかく，売られたケンカは買わなくて 


はいけないので正しいケンカの仕方を考え 
てみましよう。 

II 答ぇ ttx ラーメッセージにぁり 

エラーメッセージの表示のされ方は，前 
の例にもあるとおり，「〇〇〇〇〇 inXXX 」 
といった形式です 。 in XXX の XXX はエ 
ラーの発生した行番号（バグのある行番号 
ではないことに注意）を示します。したがっ 
て，デバ' ッグの第一歩はエラーの発生した行 
を調べることにあります。このときは全体 
のリストを表示させず，その行だけのリス 
卜を表示させます 0 L..g や E..a とするとス 
トップした行のリストを表示する BASIC も 
あるのでうまく活用しましよう（どちらも 
2つ目のピリオドはエラーの発生した行番 
号,すなわち XXX の値の代わりをします）。 
そこで，雑誌のリストと比較して間違ってい 
たら正しく打ち直します。入力法で触れた 
似た文字やキーボード上の近い文字といっ 
た打ち間違いが多いと思います。ここで1 
行だけ表示させると言ったのは，入力の際 
に2行分（行番号で2つ分ということ）が 
連結されてしまっている場合がたまにある 
からで，1行だけ表示させたつもりが2行 
分のようなリストになって表示された場合 
がそれです。 

さて，一見して間違っていないようなの 
にエラーが 発生してしまう場合があります。 
これはほかの行に原因がある場合もあり， 
それはすぐあとで触れるとして，原因がそ 
の行にあるのに発見できないことがありま 
す。そこで，ひとつの有効な手段として同 
じ行をもう一度打ち直してみるというの力 5 ' 
あります。眺めただけでは発見しにくい打 
ち間違いも再入力することで直ることが多 
く，単純なわりに効果的な方法です。 

以上はデバッグの基本中の基本ですが， 
多くのエラーはこれだけの作業で直ってし 
まいます。「答えはエラーメッセージにあ 
り」と書きました力 ? ，エラーメッセージの 
in X X X の部分だけでも十分デバッグがで 
きるのです。 

それでは，エラーの原因となるバグがエ 
ラー発生行とは異なる場合にはどうするか 
というと，ここでエラーメッセージの前半 
部分が生きてくるわけです。エラーメッセ 
ージの種類と意味は BASIC 文法書（付属の 
マニュアル） に一覧表として載っていると 
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思います。ただ，1つひとつの意味は書い 
てあっても実際にデバッグの仕方が書いて 
ないと思いますので，ここでは具体的な方 
法を エラー メッ セージ 別に述べてみます。 

その前にデバッグの基本としてたいへん 
重要なことを述べておかなければなりませ 
ん。エラーが発生した行が マルチ ステート 
メントの場合，どの命令でエラーになった 
のかをはっきりさせる必要があるからです。 

エラーメ ッ セージからエラーが起こった 
命令を特定できる場合はそれで OK です。 
特定できない場合はどうすればよい力、。い 
ろいろ考えられると思いますが，意外に知 
られていない方法ですがマルチステートメ 
ントを2行に分けて書くのがたいへん有効 
な手段です。たとえば1500行で エラーに な 
った 場合，1500行の最初の命令だけ残して 
残りを1501行にします。これを走らせて1501 
行で エラーになったら 1501行の最初の命令 
を1500行に移します。これを繰り返して1500 
行が エラーになった ときに移された命令が 
エラ ー発生源であることがわかります。 

2行以上に分けて書ける場合は，そうし 
たほうが早く見つかります。皆さんでいろ 
いろ工夫してみてください。 

それではいよいよ エラー メ ッセージ 別の 
デバッグマニュアルです。 


NEXT without FOR 

(13) 

FOR without NEXT 


RETURN without GOSUB 

(14) 

Undefined label 

(16) 

UNTIL without REPEAT 


REPEAT without UNTIL 


WHILE without WEND 


WEND without WHILE 


※カツコ内は S - BASIC のエラ 

一番号 


サンプル1 単純な打ち間違い 


1〇，くく九九の表〉〉 

20 FOR 1=1 TO 9 
30 FOR J=1 TO 9 
40 CURAOR 3*1,J 

50 PRINT I*J 

60 NEXT 
70 NEXT 
80 END 

40 行で 「 CURSOR 」 を 「 CURAOR 」 と打ち間 
違えたことにより 「Syntax error in 40」 
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これらのェラーは本来対応して存在する 
はずのコマンドの一方が存在しないために 
起こるものです。ですから， FOR 〜 NEXT ， 
GOSUB 〜 RETURN ， REPEAT 〜 UNTIL ， 
WHILE 〜 WEND の対応を考えて雑誌のリ 
スト上でもう一方のコマンドがあるべき行 
番号を見つけ，その行の LIST (これ以後 
雑誌のリストを「リスト」，パソコン上での 
リストを 「 LIST 」 と書くことにします） 

を見ると，その行自体を入力し忘れていた 
力、，行は存在してももう一方のコマンドを 
その行の中に入力し忘れていたのを発見で 
きるでしよう。しかし，リスト上で対応す 
るもう一方のコマンドを発見するのはけっ 
こう難しいもので，多少は BASIC のことを 
知らないといけません。 

また， LIST 上の対応が正しくても，ほ 
かから GOTO 文などでループ内に飛び込ん 
で来たためにこれらのエラーが 起こもこと 
もあります。これは，その GOTO 文の飛び 
先の行番号（またはラベル名）が誤ってい 
たためで，原因を見つけるのはなかなか難 
しいのですが，とりあえずリストと LIST 
でジ、ヤンフ。に関する命令 （ GOTO , GOSUB , 
IF ) を中心にチェックしてみることです。 
または，プログラムの動きを追う（トレー 


スする）方法もありますが，これは次のエ 
ラー メッセージグループでの説明の際に詳 
しく述べます。 

そのほかにも，リストにはないのに余分 
に入力してしまつたためにこのグループの 
エラーが発生することもあります。この場 
合余分に入力してしまった行で発生すれば 
問題ないのですが，正しいほうで発生する 
こともあります。ですから，エラーの発生 
した行の前後の LIST を調べてみる必要もあ 
ります。 

Undefined label というエラーは GOTO 命 
令などでジャンプする先の行番号やラベル 
が LIST 中に存在しないときに発生します。 
これは，エラーの発生した行のジャンプ命 
令の飛び先の行番号の行が LIST 中に存在 
するかどうかを調べてみます。 


Illegal function call 

(3) 

Over flow 

(2) 

Subscript out of range 

(3,7) 

Division by zero 

(2) 

String too long 

(5) 


このグループをご覧になって，一体どう 
してこれらのエラーメツセージが同ーグル 


ープになるのか疑問に思われる方も多いと 
思います。これらがひとつにまとめられる 
理由というのは，デバッグの方法が同じよ 
うになるということです0ここで言うデバ、 
ッグとは，最初に触れたとぉりすベての原 
因は入カミスであるという前提に立ってい 
るので，入カミスの発見であると思ってく 
ださい。すなわち「デバッグ=リストと LI ST 
で違っている個所を発見し訂正すること」 
です。当然のこととして，自分で作ったプ 
ログラムのデバッグにはそのまま適用でき 
ないかもしれませんが，今回の記事の目的 
である雑誌のリストをいかに正しく入力す 
るかという点では非常に実戦的なノウハウ 
だと思っています。 

エラーの発生した行に入カミスがある場 
合というのはすでに述べたとぉりですので， 
ここでこのグループのエラーが出る原因と 
いうのは，変数に誤った値（文字列も含め 
て）が代入された，ということにつきます。 
ですから，デバッグとは，どこで誤った値 
が代入されているのか，また，誤った値が 
代入された原因は何で，それはどこの入力 
ミスによるのかを突き止めることです。し 
かし， BASIC という言語の性質上，変数は 
グローバルなもの，つまり，プログラム全 
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ついて説明します。ひとつには BASIC の 
TRON コマンド（もちろん TRON があれば 
ですが）を使用する方法です。これを実行 
し RUN すると実行された行番号を表示しな 
がらプログラムを実行するというものです。 
ただ，表示が速すぎて目で追えないときがあ 
ったり，画面表示が乱れてしまったりで，実 
際にはあまり役に立つとは言えません。 

よく使われる手段はプログラム中の要所 
に STOP 文を書き，強制的に実 fi 1 を停止し 
て変数の値を表示させたりしながらチェッ 
クしていくというやり方です。こうしたテ 
クニックは自作のプログラムのデバッグに 
も有効なのですが， STOP 文の入れる位置 
やそのときに変数がどういう値をとってい 
るべきなのかということをわかっていなけ 
ればうまくいきません。したがって，多少 
はプログラミングの知識（リストの流れを 
理解していて BASIC の文法がわかる）が要 
求されます。 

以上のようにしていくといくつかのバグは 
発見できるでしよう。しかし，このように変 
数を追っていくというのは原理的には可能 
でも実際には膨大な手間がかかることがあ 
り，もう一度最初から打ち直したほうが早 
いと思われるかもしれません。もし，万策 
尽きたらそれもよいでしよう。いずれにし 
て も根気(根性）が必要です。 

さて，変数（代入文により派生するもの 
すべて ， A = B では A ， B 両方とも）が出て 
くる行はまったく正しくてもまだエラーと 
なる場合もあります0これは，プログラム 
の流れを制御する コマン ドのパラ メータに 
誤りがある場合などです。特にループの回 
数の違いによるものが多く，たとえば FOR 
〜 NEXT で，10回繰り返すベきところを100 
回繰り返してしまうことなどによります。 
このために，このグループのエラーが発生 



体で共通であるために場所の発見が非常に 
難しくなることもありますので，ここで順 
序立てて述べたいと思います。 

最初は，どの変数の値が誤っていたかを 
判別することから始めます。エラーの発生 
した行の LIST を表示させてその内容を検 
討します。そこで使われている変数が1つ 
ならば問題ありませんが，2つ以上の場合 
には，エラーメッセージの意味を考えてみ 
ます。 

「Illegal function call 」 であればコマンド 
や関数の引数，パラメータが規定の範囲を 
越えているのですし， 「 Overflow 」 は数値 
の演算の際に起きます〇 「Division by zero 」 
は0で割ると発生します （ tan (7 r /2) でも起 
こるので注意）。また ， 「String too long 」 
は文字変数の演算のとき （ A $ = B $+ C $ 
など）などに発生し ， 「Subscript out of 
range 」 は配列の添え字に宣言より大きい値 
を使用したりしたときに起こります。以上 
のような意味を考えると変数の特定がしや 
すくなります。 

また，デバッグ（一般的にも）の常套手 
段として，変数の値をダイレクトモードで 
表示させてみるという方法もあります （PRI 
NT A , B 0 などのようにする）。こうして， 


ェラーの直接の引き金となった変数を見定 
めます。 

次は，その変数にどこで誤った値が代 A 
されたかを調べます。この方法としては， 
その変数の出てくる行をしらみ潰しに調べ 
る （ HuBASIC では SEARCH を i 舌用）という 
ことがすぐに浮かびます。どこかの行の間 
違いが発見されるかもしれません。行の数 
が増えてくるとこの作業はかなり面倒にな 
るでしようが，ほかにこれといった方法も 
ないようです。しかし，この方法で間違い 
が発見できないこともあります。たとえば 
A という変数が誤った値を持つとして A の 
出てくる行はすべて正しくても，中に A = 
B といった文があり，実は B のほうに誤っ 
た値が代入されていたと.いう場合もある力 
らです。今度は， 「 A =」 という代入文の右 
辺に出てくる文字にも注目していかなくて 
はいけません。こうなってくるとかなり 
の広範囲にわたってしまいますが，デバツ 
グというのは多少は困難なものなので境 
悟を決めてリストと LIST を見比べてくた 
さい。 

別の方法としては，トレースをしながら 
変数の値をチェツクしていくというものガ 
あります0先ほど触れたようにトレースに 
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するというのはよくあることです。これは， 
プログラムのト レースを するとわかります 
が，誤りの.ある変数を含むループの制御変 
数には特に注意してみるべきです 。 LIST 
をチヱックする際に前後も確認します。 

以上は，このグループ全般に関すること 
です。ほかに 「Subscript out of range 」 で 
は，配列の大きさを定義 ( DIM 文）している 
行に間違いがあるということも考えられ 
ます。 


Out of data (24) 


この エラー メツセージが出るかどうかは 
別として， DATA 文によるトラブルは非常 
に多いと言えるでしよう。ひとつには， 
DATA 文というのは普通の場合，同じよう 
な形式のものが多くあり入力の際に間違い 
やすいということが理由でしよう。間違い 
の種類には，データの数が違っている（多 
いか 少ない）ことと，データそのものが誤 
っているという2つがあります。 

データの入カミスがあった場合にはどう 
いう現象が起こるかというと， PCG 定義の 
データやグラフ イ ツクのデータの誤りであ 
れば表示されるキャラクタや画面が乱れる 
といったもので，動作自体には影響なくエ 
ラー メツ セージの 出ないバグとなります。 
そのほかはどういうことになるかは特定で 
きず，ほとんどあらゆるエラーが起こり得 
るとも言えます。しかも，データの数が多 
い場合はたいへん誤りを発見するのが難し 
いという恐ろしいものです。ですから DATA 
文の入力は特に慎重に行う必要があります。 

私は，データが非常に多いときには，リ 
ストを線で区切ったり定規をガイドに当て 
たりしながら入力し，見落としや自分が入力 
している場所を見失わないようにしていま 
す。前に書いた2人で入力するというのも， 


データの入力時には特に有効です。 

さて ， 「Out of data 」 というメツセージで 
すが，これは READ 文で読み込むデータが 
存在しないという意味で， READ 文のある 
行で発生します。原因としては，上で述べ 
た DATA 文に誤りがある（数が足りない） 
ということと， READ 文のほう （ READ 文の 
ある行とは限らない）に問題がある場合の 
2つが考えられます。したがって，このエ 
ラーが発生した場合にはまずデータの個数 
をチヱツクします。個数が違えばどこかに 
入力し忘れたデータがあるはずです。個数 
がリストと LIST で一致していれば，一応 
原因は READ 文側にあると考えられます。 
中味が違う可能性はありますが，数さえ同 
じなら 「Out of data 」 は起きません。 

READ 文側での誤りというのは，データ 
の個数より読み込む回数が多かったのです 
から， LIST を見て何回読み込まれている 
かを調べます。この場合には， FOR 〜 NEXT 
などで読み込んでいることが多く，ループ 
の制御変数 （FOR 1 =の I のこと）の値にも 
注意してみます。また，読み始める DATA 
文の行番号を指*定するのに RESTORE を使 
っていることもあり，この行番号が違って 
いればデータの個数が合っていてもエラー 
が出ることがあります。そのほかの原因も 
もちろん考えられますが，以上の点をチェ 
ックすることでもかなりバグの発見の可能 
性が高いと思います。 


Out of tape 


Tape read error 


File not found 

(40) 

Device I/O error 

(41) 

Device full 

(53) 

Device off line 

(50) 

Write protected 

(42) 


これらは一見しておわかりになると思い 
ますが，ハードのほうのトラブルによるもの 
です0ですから操作ミス（違うテープやデ 
イスクを入れたり，プリンタのスイッチの 
入れ忘れや紙切れなど）によるものが大部 
分です0ただ，入カミスによっても起こり 
得るのですが，その場合はエラーの発生し 
た行には普通問題なく，その前の段階でフ 
アイルネームの設定やデバイスの設定での 
ミスが多いので注意が必要です。 


そのほかの エラー メ ツセージ 
エラー メ ッセージ 全般 


以上取り上げた エラー メ ッセージの ほか 
に も エラー メ ッセージは いく つか あります 
が，発生する頻度はそう高くないと思いま 
す 0 こう書くと有名な 「Syntax error 」 がな 
いではないかという反論があるかもしれま 
せん。しかし，これは エラー 発生行に入力 
ミスがある場合に含まれますので，個別に 
は取り上げませんでした。ただし， ユーザ 
一定義関数を使っている場合， DEFFN の中 
に入カミスがあっても呼び出したほうでエ 
ラーに なりますので注意してください。 

エラーメッセージが発生すると，「また 
か！」と嫌な気分になりますが，考えよう 
によってはエラーの出るのはむしろラツキ 
一な 場合で，このあと述べるようにエラー 
すら出ないという恐ろしいバグもあるので 
す。上の説明を読んでもらうとわかるとお 
り，エラーが発生した場合にそれの原因を 
突きとめる特効薬というものは今のところ 
ありません。経験と直感に頼るしかしかたが 
ないこともありますが，これまで述べた方 
法でもかなり役に立つと思います。「答え 
はエラーメッセージにあり」と言ったよう 
に，エラーメッセージの意味を十分に考え 
てデバッグしてください。 


サンプル 10 | 

| DATA 文の入カミス 


r 


10 ’<〈月別降水童〉〉 

20 PRINT ” 0 100 200 300 (ram)" 

30 PRINT ” ——+-+-+-+- " 

40 FOR 1=1 TO 12 
50 READ A 
60 X=INT(A/10+.5) 

70 PRINT RIGHTS ( H ， .+STR$ (I) , 2 > + ，， ！ ，， ； ： FOR J = 0 TO X: PRINT ，，*”；： NEXT J ： PRINT 
80 NEXT I 

90 PRINT " ——+-+-+-+-，’ 

100 DATA 54,63,102,128,148,181,125,137,193, 181.93,56 

100行で「181」と「93」の間の「， j を「. j としたことにより 「Out of data in 50」 
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||紋 m 、 るが動き嫩しい ！ 

デバッグで困るのはむしろこちらのほう 
です。エラーは発生しないけれども説明の 
とおり動かないときには非常に困ってしま 
います。しかし，せっかく入力したプログ 
ラムですから何とか完動させましょう。と 
いうわけで，この場合のデバッグの方法を 
考えてみます。 

プログラムの中には，操作上のミスによ 
る ェラーを 考慮して ON ERROR 文を使用 
しているものがあります。これは， エラー 
が発生した場合に エラー 処理をする ルー チ 
ンに飛ぶものです が， デバッグの際には邪 
魔なので ， ON ERROR GOTOO として無 
効にしておきます。ただ， エラーを 故意に 
発生させてそれを利用するというハイテク 
ニックを使ったプログラムもあるので万全 
の方法とはいえません。しかし，とりあえ 
ず実行してみてください。これで エラーが 
発生すれば，そのメッセージに即したデバ 
ッグを行っていけばよいのです。 

また，先にやり方を説明したプログラ 
ムのトレースも有効な方法です。プログ 
ラムを少しずつ実行しながら正常に動く 
部分とそうでない部分を区別していきま 
す。その際には変数の値のチェックも行い 
ます。 

それからゲリラ的戦法としては，無意識 
の内に誰でも実践されていると思いますが, 
おかしな動きを始めたときにすぐ BREAK 
( STOP ) をかけて実行を止めてしまうこと 
です。そして，止めた行の前後の LIST を 
詳しく見てリストとの違いを捜します。 
このためには ， turbo BASIC などで BREAK 
を無効 （BREAK OFF 文）にするコマンド 
があるので，これも最初に LIST 中で REM 
文に変えておきます。 

さて，動きがおかしい場合それに対処す 
る基本的姿勢としては，プログラムの動き 
(現象）を分析していくことから始めます。 
難しい言い方になってしまいましたが，具 
体的にどんな動きをするかを見て，その原 
因を考えていくわけです。たとえば，簡単 
な例としては，音楽が流れてくるときの音 
階がおかしいのであれば MUSIC ( PLAY ) 
文の中味が違っているだろうという予想が 
できます。キャラクタがおかしいのなら P 
CG 定義や DATA 文に誤りが;ありそうですし， 


表示位置がおかしいのならば PRINT 文や 
LOCATE ( CURSOR ) 文のパラメータが違 

つているのです。 

考えられるあらゆる手段を使ってもバグ 
の所在を発見できないこともあります。こ 
の場合，行き着くところは LIST とリスト 
をすベて比較していくことです。しかし， 
これも大変な作業で何とか避けたいもので 
す。そこで，すべての行をチェックする前 
に一部分をチェックしてみるということを 
考えるわけです。具体的な方法としていく 
つか例を挙げてみます。 

1) 数行おきに比較する 

これは，入力後すぐに実行せず簡単な確 
認を行う際にも有効です。 

2) コマンド別にチェックする 
SEARCH 命令を使うと簡単ですが，ある 

特定のコマンドの含まれる行だけをチェッ 
クするという方法です。 GOTO 文や IF 文 
FOR 〜 NEXT 文など力すミスも起こりやすく， 
プログラムの流れにもろに影響を与える部 
分であるだけに効果的です。 

3) 変数別にチェックする 

2) と同じく特定の変数名の含まれている 
行だけをチェックするもので，変数の誤り 
による異常はよくあることなのでこれも有 
効でしょう。 

4) DATA 文をチェックする 

エラーメッセージの 「Out of data 」 の項で 
述べましたが， DATA 文のミスは非常に犯 
しやすくて，しかもエラーが発生しないも 
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のが多いのです。キャラクタが乱れている 
とか，ペイントがはみ出すといったものの 
ほとんどがデータの間違いからくるもので 
す。したがって， DATA 文のチェックによ 
りバグを発見する可能性はかなりあります。 

といったような方法がありますが，どう 
してもバグが発見できない場合はすべての 
行をチェックすることになってしまいます。 
プリンタを持っている人は LIST を出力し 
て，リストの載っているものとチェックす 
る行を上下に並べて比較するというのも間 
違いを見つけやすくする方法です。 

以上のように，デバッグというのは大変 
なものなのです。入カミスの発見という意 
味だけでもこれだけのことがあり，まだま 
だ書き尽くせないことがたくさんあります。 
自作のプログラムのデバッグとなると，さ 
らに別の要素（アルゴリズム上のバグ：考 
え方が誤っている）も加わるのでこの場で 
は触れませんが，ここでの説明もいくらか 
は役に立つことがあると思います。また， 
投稿される方は，移植という点やこの入力 
後のデバッグという点を考えて，できるだ 
け第三者にもわかりやすいプログラムを書 
いてほしいと思います（特にメモリやスピ 
—ドの上で余裕のある場合には）。 

最後には根気がものをいうことになりま 
すが，無事に入力できプログラムが動いた 
ときの喜びはまた格別のものがあります。 
そのためにも，皆さん頑張ってデバッグし 
ましよラ0 


霣問電括は殺しのナンバー 

r バグに関するお問い合わせ」の電話は別名「質問 
電話」と呼ばれている。ここで，我々が入手した「質 
問電話を有効に利用するための耳寄りな情報」を公開 
することにしよう。実行すれば電話代の節約にもつな 
がるはずである。まずは予備知斑から。 

1 ) 答えられるのはあくまでも「バグに関するお問い 
合わせ」だけである。そのほかの質問，たとえば記 
事とは関係ないことやプログラムの移植•改造に関 
することには原則として答えてもらえない。 

2) I )と重なることであるが， 「マニュアルを よく読 
んで勉強してください j としか答えようがない質問， 
たとえばマシン語入力の仕方などは，確かに記事と 
は関係あるが電話では答えようがないと思う。 

ということでいよいよ問題の核心に入る。満足な回 

答を効率的に得るための必殺 （？） テクニックだ。 

1. 手元に本と筆記具を用意する 

まず，年•月•ページ•記事を伝えよう。早く参照 
してもらうことができる。また，手元に本がないと話 
が通じにくく，せっかく聞いた話もあとでわからなく 
なってしまうことがあるので5主意しよう。 

2. エラーの 出る条件を伝える 

何をどう操作したら異常が起きるのか，状況を詳し 
く伝えよう。エラーの原因を推定するための重要な手 
掛かりとなる。これを調べる段階で，使用する BASIC が 


違うなどの基本的な入力 • 操作ミスを発見できること 
もあるだろう。 

3. エラーの内容を伝える 

エラーメッセージの出るものは，行番号とエラー内 
容を伝えよう。できれば（本来ならば）メッセージの 
意味.エラーになった コマンド •変数を調べておきた 
い。これは次の3つの意味で重要•なことである。 

1 ) 自分自身で エラーの 内容を確認することにより， 
電話をする以前に入カミスやバグを発見できること 
がある。 

2) プログラムのバグではないことが明らかな場合で 
も，適切なアドバイスが受けられる可能性がある。 

3) 雑誌が出て間もない時期は，担当者もなるベく詳 
しい情報を欲しがっているはずである。 

以上述べたことの基本にあるのは，質問者，回答者 
ともに十分な情報を必要としている，ということであ 
る。回答者だってすベてお見通しというわけではなく， 
情報がまだ少ないときは，質問者がするのとまったく 
同じようにして考えている（ように見える）。違うの 
は情報が集まるところにいるかどうかだけだ。ここで 
も読者との共同作業が行われているのである。 

もっともよくある入カミスを担当者に聞いたら"デ 
一夕の打ち間違いによる 「Illegal function c . allj，「Out 
of data 」 ですね"ということであった。質問電話を担 
当者の殺しのナンバーではなく，バグ殺しのナンバー 
として活用したいね！ （中川智哉） 
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他機種の記事を活用する 

BASIC プロクラム移植の心? 

1 

Kudo Makoto 

エ藤誠 


毎月たくさんのプログラムが雑誌に発表されています。その中から自機種用のものしか 
利用しないなんてもったいないですね。ほんのわずかの変更で走るものがいっぱいあるの 
ですから。というわけで ， Oh ! MZ 移植担当者が語る「プログラム移植の心得」です。 


移植というのは，あるパソコンで走るソ 
フトをほかのパソコンで走るように手直し 
することである。 

市販の ゲームな どは， マシン 語 レベルで 
の移植を行っているわけだが，これは，各 
機種のハードに深くかかわってくるので， 
たいへん複雑な作業となる。しかし， BAS 
1C の移ネ直となると，一応 BASIC という特 
定の言語の上での話なので，多少は簡単に 
なるのである。それでは，まず最初に，移 
植を始める前の準備としてどんなことをし 
たらよいかをこれから述べることにする。 

|||移植作業の準備 

1 . なにはともあれ BASIC の基礎は覚えよ 

ぅ。 

これは常識である。だが，あまり BASIC 
を知らない人でも，移植が可能なことだっ 
てある。あとで述べるが，移植が比較的容 
易なプログラムと，そうでないプログラム 
があるのである。 

2. 自分の使っているパソコンで何ができ 
るかをしっかり把握しよう。 

BASIC の性能や，マシンのハードに よっ 
て，どうしても移植が不可能なプログラム 
もある。たとえば， MZ-700 でダラフイッ 
クを扱おうとするのは，素人が素手でロー 
ドウォリアーズと戦おうとするようなもの 
である。最初からあきらめて相手にしない 
ほうがよい。 もっとも， プログラムのアルゴ 
リズムだけを使って，最初から新しくプロ 
グラムを作り直せばよいかもしれない力 5 '， 
とても簡単な移植とは言い難い。 

3. 暇があったら，他機種の BASIC の特有 
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の命令も知っておこう。 

これは別に必ずしも必要なことではない。 
BASIC の比較表がひとっあれば十分である。 
ただ，知っておくと移植作業がはかどるの 
である。 

移植というのは，とにかく元になるプロ 
グラムによって，難しさや可，不可が決ま 
ってしまうのである。したがって以上の 3 つ 
の条件などから「とても僕には無理だ」とい 
う人でもプログラムによっては移植ができ 
てしまうのである。ではまず例として，次 
の HuBASIC で書かれたプログラムを S-B 
ASIC に移植してみよう。 

10 LOCATE 0,0 
20 PRINT ” ABC” 

これは， LOCATE を CURSOR に直せば 
よいのである。簡単なことでしよ。さあ， 
自信がっいたところで先に進もう。 

技術面では以上の条件を満たしていれば 
よい。問題なのは，精神面である。移植作 
業はテキストコンバータなどを使わない限 
り，原則としてプログラムを自分で打たな 
ければいけない。しかも，ただリストを打 
つだけではなく，ステートメントや関数な 
どが，自分の機種で使えるか，他の命令で 
置き換えるかなどと頭を働かせたり，資料 
を調べたりしなくてはいけない。不屈の精 
神，雑草の根性，燃える闘魂が必要なので 
ある。移植のできない人とできる人には決 
定的な違いがある。それは「執念」である。 
まあ，簡単に言うと，やる気があれば，誰 
にでもできるということなのだ。やる気さ 
えあれば，多少の知識の不足も問題ではな 
くなる。では，準備ができたところで次に 


進んでみよう。 

||移植の実際 

シャープのパソコンは，大まかに MZ 系 
と CZ 系に分類され，それぞれにタイプの 
違う S-BASIC と HuBASIC が使われている。 
おのおのの BASIC の間では，命令語が似か 
よっているので，ほとんど移植の手間はか 
からない。ということで， S-BASIC と， 
HuBASIC の間の移植を中心に述べること 
にする。 

まず S-BASIC から HuBASIC への移植を 
考えてみよう。ハードに深くかかわってく 
るステートメントなどを除くと， S-BASIC 
のステートメントや関数は，ほぼ HuBASI 
C でカバーできる。すなわち，同じものが 
あるか，あるいは代わりになるものがある 
のだ。逆に HuBASIC で作られたプログラム 
を S-BASIC に移植しようとすれば，大変 
な手間がかかってしまう。 S-BASIC にな 
い関数などは，ほかのステートメントを組 
み合わせてプログラムを組まなくてはなら 
ない。私はここで BASIC の良し悪しを論 
ずるつもりはない力 ? ，移植に関する限り， 
ステートメントや関数が多いほうが有利であ 
ると考えている。そんなわけで， HuBASI 
C から S-BASIC への移植の話が自然と多く 
なってしまった。 

移植のタイプは，大きく 4 つに分けられ 
る。やさしい順に説明してみよう。 

タイプ丨——名前，書式，働きがまったく 

あるいはほぼ同じもの。 

たとえば， PRINT などがこれに当たる。 
FOR 〜 NEXT や， IF の条件文などもこの 
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タイプであろう。言うまでもないが，この 
タイプのステートメントや関数は移植が楽 
である。これも移植のうちに入るのであろ 
うか，という疑問を抱きつつ，次のタイプ 
に行ってみよう。 

タイプ2——名前，書式が違っていても， 
ほかのステートメントや関数で代用可能 
であるもの。 

ようやく移植らしくなってきた。例を挙 
げると，先ほど述べた CURSOR—>LOCAT 
E ， また， PRINT / P ^ LPRINT などがこ 
のタイプに入る。このタイプの移植もまた 
楽である。要するに，各 BASIC の比較表 
なんかがあれば，簡単に書き換えて移植す 
ることができる。今月から3回にわたって 
掲載される 「BASIC DATA LIST 」 をお 
おいに活用しよう。 

以上2つのタイプのステートメントや関 
数のみに使っているプログラムは，あまり 
BASIC のことがわからないような人でも移 
植することが可能である。アルゴリズムを 
理解する必要もないし，プログラムを解析 
する必要もない（ただし，変数名の制限な 
どの問題は残っているが)。しかし，実際に 
こんな単純なステートメントだけで書かれ 
ているプログラムには，めったにお目にか 
かることはない。普通は，次のタイプ3が 
移植作業のメインとなっている。 

タイプ3——代用できるステートメント， 
関数がなく，プログラミングして同じ働 
きをさせなければならないもの。 

具体的な例は，あとでリスト付きで説明 
するが，ここまでくると，もはや BASIC の 
知識なしには移植できなくなってくる。特 
に，命令数の少ない BASIC では，このタイ 
プの移植が多くなりがちである。この話は 
あとに譲って，次のタイプに進んでみよう。 
タイプ4—— BASIC 上では，移植が不可能 
なもの。 

BASIC 上で移植が不可能と言っても，マ 
シン語レベルでは可能なものがある。たと 
えば MZ -80 B / 2000/2200では， 

POKE $952, 〇 : GETK $ : $952,166 
とすれば，リアルタイムキー入力 （HuBA 
SIC では， K $ = INKEY $ (0))が可能に 
なるし， 

USR ($0 F 14) 

で， BEEP 音を発することができる。 
一般的にはこのようなものではなく，根 


本的に ハー ドが サボート できないなどの理 
由によるものが多い。しかし私は，この夕 
イプに対する必殺テクニックを2つばかり 
持っている。それを今回は，特別に伝授す 
ることにする。 

第1のテクニックは，すっぱり移植を諦 
めることである。これは，あまり説明を要 
しないだろうし，私もまた多くは語りたく 
ない。第2のテクニックは，そのステート 
メントなどを使っている部分を，ばっさり 
切り捨てることである0たとえばゲームな 
どで，ゲームオーバーの際に3.重和音の音 
楽を流す部分など，プログラム全体の中で 
本筋にあまり影響を与えないところは，機 
能を大幅にカットするか，思い切って切り 
捨てるべきである。何も完璧な移植を行う 
必要はないのだ。このテクニックはかなり 
有効であるが，多用しすぎるとブログラム 
力 ? 消えてしまうという欠点がある。程度を 
わきまえて使ってほしい。 

さて，ほとんどの コマンド， ステートメ 
ント，関数，システム変数などは，以上の 
4つのタイプに分類できるのだが，これら 
の中に含まれないものもないわけではない。 
すなわち，名前や書式が同じ，あるいは非 
常に似ていても，処理が違うという悪夢の 
ようなタイプである。代表的なものを，4 
つ挙げておこう。 

ひとつは LOG という関数である。これは 
S - BASIC では，常用対数すなわち logio を 
示しているのだが， HuBASIC では，自然 
対数 In ( log e ) を示しているのである。これ 
などは，思わずタイプ1と間違えそうにな 
るであろう。 

Hu の LOG ( X ) bS の LN ( X ) 

S の LOG ( X)-HHu の LOG ( X )/ LOG (10) 
これでよい。対数ってなあに？とおっし 
やられる読者の方も，何も考えずこのよう 
に変換すればよろし。 

次の関数は RND ( X > である 。 HuBASIC 
の場合 X はダミーなのでなくてもよく，乱数 
系列の設定は RANDOMIZE 命令で行う。 
それゆえ， X はどんな数でもよい。ところ 
が S - BASIC では， X が0以下の数で乱数系 
列の初期化が行われるので， Hu から S への 
移植の際に X が0になっているとき，ああ， 
こりや同じ命令だなんて書き換えずに打ち 
込むと，その時点でもうすでに死んでいる 
のである。 


X >0: S の RND ( X 卜 Hu の RND ( X ) 
XSOrS の RND ( X ) eHu では ， RANDO 
MIZE ( n ) 命令を使う。 
逆に， HuBASIC の RANDOMIZE を S-BA 
SIC にするのは，システム変数 TI $ を使 
って以下のようにするとよいだ'ろう。 

10 T = VAL (RIGHT $ (TI $, 2)) 

20 FOR 1 = 0 TO T 
30 R = RND (1 ) : NEXT 
乱数はゲームなどでは大変重要な要素で 
あるから，ぉろそかにしてはいけない。と， 
これで乱数もよろし。 

最後はシーケンシャルファイルへの出力 
である。これは，名前が多少違っているが， 
ファイルをオープンして， PRINT 命令で 
書き込んで，ファイルをクローズする処理 
は同じように見える。移植のタイプから言 
えば，先に述べた中のタイプ3,代用命令 
がある類ではないかと思うだろうが，実は 
これは罠なのである。 

ファイルへの出力は， PRINT # n あるい 
は PRINT / T などで行われるが，複数のデ 
ータを カンマ“，”で 区切って出力した場合 
の処理が， HuBASIC と S - BASIC では異な 
っている。 HuBASIC は，スクリーンに出 
力するのと同じようにファイルに出力する 
ので， カンマで 区切っても複数のデータと 
しては扱わないのだが， S - BASIC の場合 
はきちんと複数のデータとして扱う。つま 
り， S-BASIC の 「 PRINT # n ( PRINT / T ) 
A $， B $，...... 」は， HuBASIC にすると ， 「P 

RINT#n A $ : PRINT#n B $ ：PRINT 
# n ……」となることに注意しなければなら 
ない。なぉ，言うまでもないことだが， A $， 
B $ が数値 データ （たとえば A ， B ， 10など） 
でもかまわない。最後になったが，気を付 
けなくてはならないのは，キャラクタの相 
違である。グラフィックキャラクタは言う 
までもない。同じキャラクタでも，アスキ 
ーコードが違うものがあるので注意すべし。 
CHR $ (〜）と ASC (〜）の関数があった 
ら，そこで使われるデータは十分調べる必 
要がある。 コントロール コードなどの働き 
も，各機種間で相当に違っている。たとえ 
ば， X 1で画面をクリァすると MZ -2000 で 
同様のことをするのでは次のような違いが 
ある。 

XI PRINT CHR $ (12) 

2000 PRINT CHR $(6) 
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各機種のアスキーコードとコントロール 
コードを表1，表2に示しておく。 

これで，実際にどうやって移植するのか， 
雰囲気だけでもわかってもらえたであろう。 
まさに移植作業は，人間業とは思えないく 
らいの手間と時間がかかるのである。 

||サブルーチン集 

ここで取り上げるサブルーチンは， Hu 
BASIC から S-BASIC の移植を行う際に， 
代用する命令がない関数や，ステートメン 
卜をプログラミングしたものである。当初 
は， S-BASIC から HuBASIC への移植に役 
立つサブルーチンも挙げるつもりだったの 
だが， S-BASIC の主な命令は，すべて Hu 
BASIC で同じものや，代わりになるものが 
見つかったりする。つまり，先ほどの移植の 
タイプで言えば，タイプ 1 と 2 で， BASIC 
の比較表があれば，誰でも移植できるので 
ある。そこで， HuBASIC から S-BASIC へ 
の移植サブルーチン集になったわけだ。プ 
ログラムは，初心者が理解しやすいように， 
ということを考えて作ったので速度などの 
点は良いプログラムとは言えない。実際に 
使うときは，自分なりに改造して使ってい 
ただきたい。なお，正しくない引数に対す 
る処理は，ほとんど何もしていないので， 
これらのサブルーチンを呼ぶときには変数 
の値に十分な注意が必要となる。では，個 
個のリストの説明に移ろう。 

リスト I INKEY$ ( I ) 

この関数は， カーソルを 出してキー入力 


があるまで待ち，キー入力があったらその 
入力されたキャラクタを返すものである。 

A $に カーソル 用のキャラクタと， カーソ 
ルを左に移動させるコードを入れておく 

( MZ -80 B / 2000は CHR $ (4)， MZ -80 K / C / 
1200では CHR $ (20))。 B $ には， A $ の力 
ーソル用キャラクタの代わりにスペースを 
入れ ， A $と B $を交互に画面に出力する 
ことによってカーソルのように見せるので 
ある。入力されたデータは IN $ という変数 
に入り，サブルーチンから帰ってくる。 

リスト 2 INSTR(B$, A$) 

B $ の文字列の中で，何番目に A $ が入 
ってい^)かを捜す関数で，もし A $ が見つ 
からない場合は0を返してくる。 A $， B $ 
それぞれ値を決めてこのサブルーチンを呼 
ぶと，数値変数 IN に INSTR の値が入るよ 
うになっている。なお， B $ の n 番目から 
捜す場合 ( HuBASIC では INSTR ( n，B $， 
A $ )) は，1020行の FOR 〜 NEXT の初期値 
を1ではなく n にすればよい。この関数は， 
アドベンチャーゲームや人工知能などの会 
話型プログラムを作る際に使うと便利であ 
る。 

リスト 3 HEXCHR$(X$) 

XI や MZ -1500 では，データを16進数で 
扱うことが多い。これはキャラクタパタ 
ーンの定義に使われるのだが，グラフイッ 
クパターンの定義にも16進数は便利である。 
この HEXCHR $ という関数は，16進数の 
文字列たとえば “313245” などを2つずつ 
アスキー コードと考えて対応する文字列“ 12 


A ” に変えるものである。 X $ に16進数の 
文字列を入れてナブルーチンを呼ぶと ， H 
C$ に答えが入って返ってくる。 

リスト 4 HEX$ (X) 

数値を16進で表したいとき，たとえば X 
1ではディスクの内容をダンプするプログ 
ラムなどに使ってあるが，この関数は便利 
である。数値変数 X (ただし 一65535 <X 
<65535)に値を入れると， HE $ に16進数 
の文字列が入る。 

リスト 5 VAL(“&B” + X$) 

XI HuBASIC では，16進数，8進数のほか 
に2進数も扱えるようになっている。8進 
数はともかく， 2進数はグラフィックのハ。 
ターンが一目見ればわかるという利点を持 
つ。2進数 “0110…”などの文字列は ， Hu 
BASIC では “& B ” をつけて VAL 関数を使 
えばすぐ10進数になる。そこでこれを S-B 
ASIC で行ったのがこのプログラムである0 
X $ に2進数を入れサブルーチンを呼ぶと， 
B に値が入る。なお，1080行にあるように， 
B の値には制限があり， X $ の長さも16桁 
までである。 

リスト6 キャラクタの BF 
キャラクタを使って四角形を描き，内部 
も埋めるプログラムである。キャラクタで 
ラインを引くのは，あまり使われない力 ? ， 
四角形はよく使われる。 X 0, Y 0, XI ， Y 1， 
で四角形の対角位置を決め ， A $にセット 
した1文字のキャラクタで四角形を描くよ 
うになっている。 X 1 F など NEW BASIC 
で走らせるときは，1030〜1060行，1090行 
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リスト 4 

HEX $( X ) 

1000 

>し 1ST 4 




1010 

"HE^^EXttX) 




1020 

HE$="":H=X 




1030 

IF H<0 THEN H=H+ 65536 ! 




1040 

FOR 1=3 TO G STEP -1 




1050 

A=16^I 




1060 

H0=INT(H/A):H=H-H0*A 




1070 

IF (H0<=0)*(HE^="") THEN GOTO 1100 




1080 

IF H0 く 10 THEN HE*=HE»+CHR$(48+H0)s GOTO 1100 


. 0 

_ 9 

1090 

HE*=HE«+CHR*(55+H0) 


.A 

- F 

1100 

NEXT I 




me 

RETURN 





を削って，1064，1095行を復活させればよ 
い。2000，2200の場合は，1030〜1060行を 
削って，1066行を復活させる。ただし，こ 
のサブルーチンを使って，スクリーンの一 
番右下 （ CURSOR 39,24あるいは79， 24) 
に四角形の一端がかかる場合，画面がスク 
口ールすることもあるので注意が必要であ 
る。なお，四角形の中を埋めずに，枠だけ 
を残す場合は，四角形の中をスペースなど 
で消せばよい。 

リスト7 CIRCLE ( X , Y),R 
これはおまけである。グラフィックは使 
えるのにサークルは書けないという S-BA 
SIC MZ -1 Z 001 を使っている人のために， 
円を描くプログラムを作ってみた。中心座 
標を X ， Y に，半径を R に入れて呼べばよ 
い。円を描くのがやたらに遅い XI HuBASIC 
よりも，もしかしたら速いかな？と思って 
HuBASIC でもやってみたが，やはり CIR 
CLE 命令の方が速かった。1070行を， 

LINE ( X 0， Y 0> —( X 1， Y 1)， PSET ， 7 


に変えると HuBASIC でも走る。もの好き 



な人はやってみてください。 

_||移植しやすいブ□グラムとは 

これらのリストを見て， BASIC のわかっ 
ている人なら，「何で一簡単じやね一か」など 
と思っているだろう。そうなのだ，移植と 
いう作業は，技術的にはそれほど高度な知 
識を必要としない。移植担当の私本人が言 
うのだから間違いはない。問題なのは根気 
なのである。とにかく移植作業は苦労が絶 
えない。 

そこで人一倍なまけものの私としては， 
仕事が楽になる方法を思いついたのである。 
っまり，読者の皆さんが，私が移植しやす 
いようなプログラムを作ってくださればよ 
いのだ。というわけで，これから私は，い 
かにしたら移植しやすいプログラムが作れ 
るかを述べることにする。ここだけはしっ 
かり読んでいただきたい。 

その I わかりやすいプログラムを！ 

わかりやすいプログラムとは何か？ 詳 
しく言うと，プログラムが見やすく，アル 
ゴリズムが簡単にわかるようなプログラム 
である。具体的にどうするかと言うと ， F 
OR 〜 NEXT のループの中は見やすいよう 
に1文字下げる，わずか1行中に命令をた 
くさんつめ込むなどということはやめる， 
注釈を効果的に使う，などなど。とにかく 
人に見せても恥ずかしくないようなプログ 
ラムを作っていただきたい。 

その2 サブルーチンを使って！ 

たとえば書式の違うグラフィック命令な 
どが，プログラムのあちらこちらに多数ち 
らばっていたらどうなるであろうか。その 
命令ごとに書き直すのはたいへんに疲れる 
のである。これが，たとえばラインはライ 
ンのサブルーチン，サークルはサークルの 
サブルーチンとまとまっていれば，そのサ 
ブルーチンだけを直せばすむのである。各 
機種間で異なる命令を何回も使うときは， 


特集 BASIC “行動学”入門 

BASIC でサブルーチンが使えるということ 
を思い出してほしい。 

その3 特有の命令はなるべく使わない！ 
その命令を使わなければ，絶対にこのプ 
ログラムは成立しない！と力を込めて言 
える場合ならばかまわない力 ? ，それ以外の 
ときはなるべく機種特有の命令を使わない 
でいただきたい。どこかのソフトをまねて， 
意味もないのに TV を消したりつけたりす 
るなんてことはじないように。プログラム 
全体から見て意味がないなら，特有な命令 
は自分で切ってもらいたいと思う。書き換 
えるだけでも手間がかかる移植作業に，よ 
けいな作業が増えてはたまったもんじゃな 
い。また，各機種に特有のキャラクタもで 
きるだけ使わないほうがよい。 

実際にあったプログラムの話だが，文字 
変数に意味のないキャラクタを入れる部分 
があった0プログラムを解析してみると， 
その文字列の1文字ごとのアスキーコード 
をデータとして使っているのである。まる 
で私にケンカを売っているようなプログラ 
ムであった0数値データだったら数値を使 
えばいいのに……。また，ステートメント 
で代用できるのにコントロールコードを使 
って， 

PRINT CHR$ (12) 

などと書くのも困りものである。いつまで 
も PC -80 の影を引きずっていてはいけない。 
コントロールキャラクタならわかりやすい 
ので使ってもよいが， MZ 系だけである。 
XI では，コントロールキャラクタをプリ 
ンタで印字しようとすると誤動作の原因と 
なるので絶対に使わないように。 

その4 どうして，各 BASIC すべて共通の 
命令だけを使わないのダ！ 

失礼しました。ちょっと手がすべって本 
音を書いてしまった。しかしよく考えてみ 
ると，そんなプログラムばかりになると， 
移植作業は必要なくなり，移植担当の私は 
失業してしまうではない力、これは困った。 
というわけで，その4だけは忘れていただ 
きたい。失業はしたくない力 5 '，作業は楽を 
したい。人間はなんとぜいたくなのであろ 
う力*。ただ，これだけは言っておきたいが 
同じような内容のプログラムなら，移植し 
やすい方が雑誌に載る可能性が高い。思い 
やりの気持ちを，プログラミングまで生か 
してほしいなあ，と思うのであった。 
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表 1 各機種の コントロールコード ー覧 


:□- 

-ド 

XI , MZ -700( HuBASIC ), MZ - 2500 ( PC , FM もほぼ同じ） 

MZ -700 (S BASIC ) MZ -1500 

MZ -80 B / 2000 /2200 

10進 

16進 

処理内容 

キ ー 

処理内容 

キー 

処理内容 

キー 

1 

01 

インサートモード 




力ーソル下移動 

i 

2 

02 

1ワード分左に戻る 




力ーソル上移動 

t 

3 

03 

BREAK する( XI , MZ -700) 

SHIFT + BREAK 

ひらがなモードにする （700) 

CTRL + カナ 

力ーソル右移動 

— > 

4 

04 

スクリーンなどの初期化 




力ーソル左移動 

< — 

5 

05 

力ーソルから右を行の終わりまで消去 


小文字あるいはひらがなにする 


力ーソルをホーム位置に移動 

HOME 

6 

06 

1ワード分右に進む 


大文字あるいはカタカナにする 


画面消去 

CLR 

7 

07 

ベルをならす 




1文字消去 

DEI _ 

8 

08 

1文字消去 

DEL 



空白挿入 

INST 

9 

09 

水平 TAB の実行 

TAB 



グラフィック〇ノーマルモード切り替え 


10 

0 A 

行の分離，ラインフィード 




シフトロック»ノーマルモード切り替え 


II 

0 B 

力ーソルをホーム位置へ移動 

HOME 





12 

0 C 

画面消去 

CLR 



カナ ㈠ ノーマルモード切り替え 


13 

0 D 

キヤリツジリターン 

cR,a 

キャリッジリターン 

CR 

キャリッジリターン 

CR 

14 

0 E 

カーソルより上を上方向にスクロール 




ノ ーマルモードにする 


15 

0 F 

力ーソルより下を下方向にスクロール 




カナモードをキャンセルする 


16 

10 

大文字あるいはひらがな(700) 


1文字消去 

DEl _ 



17 

II 

※1 


カーソル下移動 

i 



18 

12 

空白挿入 

INS , INST 

力ーソル上移動 

t 



19 

13 

迻2 


力ーソル右移動 

~~> 



20 

14 

水平 TAB の設定 


力ーソル左移動 

< — 



21 

15 

英数モードにする （ MZ -700) 

英数 

力ーソルをホー厶位置へ移動 

HOME 

※丨一時停止の解除( XI ) 


22 

16 

カナモードにする （ MZ -700) 

カナ 

画面消去 

CLR 


23 

17 

次の行と結合( XI , MZ -2500) 


グラフィックモードにする 

GRAPH 

小文字あるいはカタカナ 


24 

18 

※ヨ 


空白挿入 

INST 

( MZ -700) 


25 

19 



英数モードにする 

英数 

※之一時停止( XI )ひら 


26 

IA 

カーソル以下をすべて消去 


カナモードにする 

カナ 

かなモ—ド， CTRL + カナ 


27 

IB 


ESC 

BREAK する 

SHIFT+BREAK 

( MZ -700) 


28 

1 C 

力ーソル右移動 


ひらがなモードにする(1500) 

CTRL + カナ 

※ヨカーソル行をすべて消去 


29 

ID 

力ーソル左移動 




( MZ - 250 0) 次の行と 


30 

IE 

カーソル上移動 

T 



結合 ( MZ -700) 


31 

IF 

力ーソル下移動 

1 






表 2 各機種 アスキーコードー覧 




MZ-80B 

2000 

2200 



XI/XI turbo 

X 

16ii 

0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

A 

B 

C 

D 

E 

F 


16 進 

0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

A 

B 

C 

D 

E 

F 


16 進 

2 進 

0000 

0001 

0010 

0011 

0100 

0101 

0110 

0111 

1000 

1001 

1010 

1011 

1100 

1101 

1110 

1111 

16 進 

2 進 

0000 

0001 

0010 

0011 

0100 

0101 

0110 

011 】 

1000 

1001 

1010 

1011 

1100 

1101 

1110 

1111 

0 

0000 




0 

@ 

P 


P 

一 

- 


- 

夕 

5 

# 

I 

0 

0000 




0 

@ 

P 


P 

II 

= 

Q 

a 

7 

$ 

B 

■ 

1 

0001 



! 

1 

A 

Q 

a 

q 

- 

1 

. 

7 

ヂ 

ム 

〇 

± 

1 

0001 



! 

1 

A 

Q 

a 

q 

l 

Y 


1 

チ 

厶 


D 

2 

0010 



- 

2 

B 

R 

b 

r 

■ 

丄 


ィ 

V 

メ 

秦 

金 

2 

0010 

分 


，. 

2 

B 

R 

b 

r 

t 

QD 


ィ 

フ 

メ 

i 

B 

3 

0011 



« 

3 

C 

S 

c 

s 

■ 

T 


ヴ 

テ 

モ 

¥ 

本 

3 

0011 



U 

3 

C 

S 

c 

s 

- 

• 


ク 

ヲ 

モ 

a 

■ 

4 

0100 



$ 

4 

D 

T 

d 

t 

■ 

-1 


I 

h 

t 

♦ 

* 

4 

0100 

❖ 


$ 

4 

D 

T 

d 

t 

- 

〇 

IS 

I 

h 

t 

田 

B 

5 

0101 



% 

5 

E 

U 

e 

u 

■ 

\ 


才 

ナ 

1 

拿 

文 

5 

0101 

問 


X 

S 

E 

U 

e 

u 

奉 

1 

D 

才 

ナ 

1 

〇 

■ 

6 

0110 



& 

6 

F 

V 

f 

V 

■ 

+ 

ヲ 

U 

二 

3 

A 

I! 

6 

0110 

© 


& 

6 

F 

V 

f 

V 


J 

ヲ 

D 

二 

3 

a 

■ 

7 

0111 




7 

G 

W 

8 

V 

■ 

1 

7 

キ 

ヌ 

ラ 


B 

7 

0111 




7 

G 

W 

8 

w 

♦ 

r 

7 


ヌ 

5 

i 

H 

8 

1000 



( 

8 

H 

X 

h 

X 

1 

J 

ィ 

ク 

本 

V 

X 

« 

8 

10(H) 



( 

8 

H 

X 

h 

X 

拳 

L 

V 

ク 

* 

” 

m 

H 

9 

1001 



) 

9 

I 

Y 

i 

y 

1 

L 


ヶ 

ノ 

% 

■ 

ft 

9 

1001 



) 

9 

I 

Y 


y 


+ 

勺 

ヶ 

ノ 

% 

a 

B 

A 

1010 



拿 


J 

Z 

j 

z 

1 

r 

X 

3 

A 

レ 

鼸 


A 

1010: 



. 


J 

Z 

j 

z 

A 

1 

X 

3 

A 

レ 

u 

B) 

B 

1011 



♦ 


K 

[ 

k 

{ 

1 


t 

サ 

ヒ 

D 

■ 

年 

B 

1011 





K 

i 

k 

{ 

IT 

- 

才 

サ 

ヒ 

U 

Q 

田 

C 

1100 




< 

L 

V 

1 

1 

1 

v 

r 

シ 

フ 

つ 

■ 

円 

C 

1100 




< 

L 

\ 

1 

1 

ii 

丄 

r 

シ 

フ 

ヲ 

n 

四 

D 

1101 



- 

- 

M 

1 

m 

) 

■ 

j 

a. 

ス 

へ 

ン 


人 

D 

1101 



- 

置 

M 

i 

m 

) 

材 

丁 

a 

ス 

へ 

ン 

囡 

B 

E 

1110 




> 

N 


n 

' 

■ 

C 

3 

t 

$ 


\ 

1 

E 

1110 


■ 


> 

N 


n 

- 


■\ 

3 

セ 

本 

- 

IS 

a 

F 

1111 



/ 


0 

- 

0 

X 

./ 

\ 

V 

ソ 

7 


□ 

子 

F 

1111 


遵 

/ 

? 

0 


0 

1 

卄 

1- 

プ 

V 

7 


田 

% 

MZ-80K/C 

1200 

700 

1500 






16 進 

0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

A 

B 

C 

D 

E 

F 

MZ-2500 


16 進 

0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

A 

B 

C 

D 

E 

F 


16 進 

2 it 

0000 

0001 

0010 

0011 

moo 

0101 

0110 

0111 

1000 

1(K)I 

1010 

1011 

110(] 

1 1101 

111(] 

> 1111 

(PC, FM 

16 進 

2 進 

0000 

0001 

0010 

0011 

0100 

0101 

0110 

0111 

1000 

1001 

1010 

1011 

1100 

1101 

1110 

1111 

0 

0000 




0 

@ 

P 

畚 

B 

1 

- 

夕 

S 

- 

r 

- 

1 

もほ (3T 问 

0 

0000 




0 

0 

P 


P 

— 

丄 


- 

夕 

C 

= 

X 

1 

0001 


□ 

! 

1 

A 

Q 

H 

H 


7 

チ 

厶 

1 

丄 

奉 

# 

し） 

1 

0001 



! 

1 

A 

Q 

a 

q 

■ 

丁 


7 

ヂ 

厶 


円 

2 

0010 


□ 

.. 

2 

B 

R 

X 

文 


ィ 

? 

メ 

_ 

丁 

1 

一 


2 

0010 



- 

2 

B 

R 

b 

r 

■ 



ィ 

V 

メ 


年 

3 

0011 


B 

林 

3 

c 

S 

大 

¥ 



i 

モ 

一 

H 

- 

零 


3 

0011 



U 

3 

C 

S 

c 

s 

麵 

h 


9 

f 

t 


li 

4 

0100 


□ 

$ 

4 

D 

T 

•K 

木 


I 

h 

V 

一 

1 

- 

1 


4 

0100 



$ 

4 

D 

T 

d 

t 

■ 

- 


I 

卜 

V 

A 

B 

5 

0101 


0 

X 

5 

E 

U 

> 

金 


才 

ナ 

I 

1 

1 

- 

A 


5 

0101 



X 

5 

E 

U 

e 

u 

■ 

— 


才 

ナ 

1 


鳙 

6 

0110 


s 

& 

6 

F 

V 

¥ 

t 

ヲ 

n 

- 

3 

癍 

1 

- 

X 


6 

0110 



& 

6 

F 

V 

f 

V 

■ 

1 

ヲ 

力 

二 

3 


分 

7 

0111 




7 

G 

W 

❺ 

t 

7 

キ 

ヌ 

5 

1 

- 

1 

〇 


7 

0111 




7 

G 

w 

g 

w 

■ 

1 

7 

キ 

ヌ 

ラ 

f 

於 

8 

1000 



( 

8 

H 

X 

Q 

年 

V 

ク 

ネ 

” 

■ 

■■ 

I 

4 


8 

1000 



( 

8 

H 

X 

h 

X 

1 

r 

A 

ク 

* 

*； 

秦 

于 

9 

1001 



) 

9 

I 

Y 

K 

鷗 


ヶ 

/ 

% 

f 

_ 


1 


9 

1001 



) 

9 

I 

Y 

i 

y 

1 

1 


ヶ 

ノ 

ル 

零 


A 

1010 



• 


J 

Z 

W* 

分 

X 

3 


レ 

1 

J 


♦ 


A 

1010 



. 


J 

Z 

j 

z 

1 

L 

X 

3 * 

)\ 

レ 

♦ 

g 

B 

1011 



♦ 


K 

i 

-M 


才 

サ 

ヒ 

D 
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円 
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シ 

フ 

ヲ 

□ 


し 
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C 
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< 

L 

V 
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1 

1 

r 
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シ 

フ 

フ 
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PSET 

• シャープ^ 7)^ 能 =0 

0 

0 

i 1 

1 

0 

1 

0 

1 , 

0 

1 

0 

狼 

強制的に指定の色に変える。 

PRESET 

0 

0 

: 1 

1 

0 

1 

0 

1 

1 ま 0 主 1 

0 / 0 / 丨 

0は〇は1 

強制的に指定の色の補色か，背 
景色か， 0( Hu ) にする。 

AND 

• S 25 の機能 =3 

0 

0 

翁 

! 1 

0 

1 1 

0 

1 ; 

0 

0 

0 

1 

両方セットされていればセット。 

OR 

• シャープ系の機能 =1 

0 

0 

ll 1 

1 

0 

1 

0 

1 

0 

1 

I 

1 

どちらかがセットされていれば 
セット。 

XOR 

• S 25 の機能=2 

0 

0 

1 

1 

0 

1 

0 

1 

0 

1 

1 

0 

反転させる。 

NOT 

0 

0 

i 1 

1 

0 

1 

0 

1 

1 

0 

i 雇 

0 

強制的に補色でセット0 
(F 用） 

SCR 

0 

0 

1 

1 1 
0 

0 

1 

1 

0 0 
10 

0 0 

1 0 

0 1 

1 1 

0 1 
II 

0 

0 

1 

0 

0 

1 

1 

1 1 

パラメータは前者が色後者が 
パターン。色が丨の所のみパタ 
ーンをセット。 

( M 25 用） 

FPSET 

0 

0 

儀 

1 1 

0 

0 

1 

1 

0 0 

1 0 

0 0 

1 0 

0 1 

1應 

0 1 

1 1 

0 

0 

1 

! 1 

0 

! 

0 

應 

パラメータは前者が色，後者が 
ハ•ターン。パターンが1の所の 
み色をセット。 

( M 25 用） 


表 4 MZ-700/1500 で表中にない命令 


表3 MZ-80B/ 2000/2200で表中にない命令 



習うより慣れろ。 




何度となく 口に，耳にするこの言葉ですが， 


表1 


それだけ的を得たものなんでしようね。ところでその BASIC ですが， 
いくら慣れろと言ってもそう次から次へと新しいアイデアが出てく 
るわけには參りません。何か手近な題材はなどと考えるほど，何 
も浮かばなかったりするのです。かと言って人のプログラムを打っ 
て動いた，というだけでは慣れたことにはならないし。 

というわけで，ここはひとつ，他誌に掲載されたプログラムの移 

BASIC DATA LIST 活用にあたっての注意点 


植にチヤレンジしてみてはいかがでしょうか。うまくいった暁には， 
そのプログラムを使って楽しめてしまう，という，一大特典も付い 
ています（当然）。おまけに相手の BASIC もわかってしまうのですから， 
_石三鳥とはまさにこのことなのです。これら基本 BASIC (7) DATA 
LIST を，今月から3回にわたり連載します。このリストをいかに活 
用するかはあなたの努力しだいです。それではドーンといってみま 
しょうか。（風間浩） 

表2 各 BASIC のグラフィック命令パラメータ 


表中では割愛した MZ -80 B / 2000/2200用 BASIC MZ -2 Z 00 I , MZ -2 Z 002, MZ -2 Z 02 I で 
サポートされている GP 旧インタフヱイス（オプション）サポート命令。 


I C し 

TRG 

RED / 

PPC 


REN 
PCT 
CMDW 
PPO し 


し CL 
WRT 
CMDR 
PPU 


EO I R 

いずれも他の BASIC には移植不能。 


しし O DC し 

RED WRT / 

ON SRQ SPO し 
GPIBM EOIW 


表中では割愛した MZ -700 の HuBASIC , S - BASIC 及び MZ -1500 の S - BASIC でサポートされ 
ているプロッタプリンタ命令 （（•） 内は MZ - I 500 での名称）。 


MODE T I 
(PMODE 
PCO し OR 

PAGE 


TL) 


MODE TN 
(PMODE G R) 

MODE GR 
(PMODE GR) 

SKIP 
(PS K I P) 

R し I NE 

PHOME 
AXIS 

PLOT OFF 

いずれも他の BASIC には移植不能 （ プロッタブリンタを使えば PRINT/P • LPRINT で代用 
できる場合もある）。 


MOVE 
(PMO VE) 
HSET 
CIRCLE 
(PC I RC し E) 


MODE TS 
(PMODE TS) 
TEST 
(PTE ST) 
LINE 
(P し I N E) 

RMO VE 
(PMO V) 

GPR I NT 
PLOT ON 



ラベルの使える BASIC ， つまり N 88, Hu ， M 25, S 25, S 
(② 0)) では，原則としてラベルを使うこともできる。た 
だし， Hu ， s ( dXD ) では主にプログラム中でのみ使用 
可能 （ LIST や RUN 行番号ではファイル指定との区別が 
つかないので使用不可)。 

麵 

開始行番号[一〔終了行番号〕]または一終了行番号を 
意^する。 Hu では「一」の ft わりに「， J を{吏うことも 
できる。ラベルが使える BASIC では，ここでも原則とし 
てラベルが使える。 

式 

0と力、5と言った定数や梁^関数等。また，それらを 
組み合わせたもの。 

麵名 

配列落^名（添字〔，添字…〕）を含む。文字^でも数値 
型でも良い。 

“文努 IJ ” 

文字型の変数や式でも良い。“文字型デーダ’や“ファイル 
名"でも同様。 

日^^小文字 

カナや 漢字， アルファ ベットの小文字，〔〕，！丨は説 
明用なので実際には指定しない（他のキーボードにない 
記号も同様)。ただし， アルファ ベットの大文字，数字， 

カンマなどキーボードにある記号は実際にも入力する。 

[] 

この中を省略しても良いことを示す。 〔 a 〔 b 〔 c 〕〕〕 な 
ら全部省略， A ， AB ， ABC が指定できる。ただし BC の 
ような指定はできない。 


同様のノラメータカ漏くことを示す。 

( 2 ) 

〇か△のどちらか （ 3個以上ではどれか）を選^ことを示 
す。また， [ 1 21] とあれば，〇か△か省略のどれかになる。 

( Xs , Ys )-( Xe , Ye ) 

(:の x 座標”; th の y 座標）一(右下の x 座標，右下 
の y 座標） 

( x , y ) 

Nss , MSX , M 25 では STEP ( x , y ) としても良い。 x，y 
以外に xi ， y 2 等も同様 ( xs ， ye 等は除く）。 

S 25 の X ， y 

同様に STEP ( x , y ) としても良い。 （） が付くので注意。 

【カラー指定】 

〔[〔色〕〔，機能〕〔，ラインスタイル〕]〕… S 25 

カラー指定丨としたもののみ 

〔 I 色〕〔，重ね合わせ 〕]〕… S 
〔[色〕〔， W 重ね合わせ〕]〕… SHARP の④⑥ 

指定しない(指定できない）… SHARP の ⑥ QdxixD 
([] の中は無視してください） 


本表はステートメント.コマンドと関数とを完全に分け 
ているか' 例外として@はステートメント， ® は関数で 
ある 0 


指定したパラメ—夕 

グラフィックの各プレ 
—ンのドットの様子 


ド 

I 

モ 
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RUN 〇 ONT NEW NEW ON 〇 MD UNLINK TRON TROFF MON し 1ST しし 1ST AUTO 
EDIT 


働き 

N-BASIC ( PC - 8001 ほか ) 

⑬…ディスク版にのみ存在 

NgsBASIC ( PC -8801 ほか ) 

(^R>*88SR のサウンド関係の拡張命令 
ディスク版にのみ存在 

MSX-BASIC VI . 0 (各社 MSX ) 

⑬…ディスク版にのみ存在 

プログラムを先頭から 
実行。 

RUN 

RUN 

RUN 

変数を消してプ a グラ 
ムを途中から実行。 

RUN 行番号 

RUN 行番号 

RUN 行番号 

指定プログラムを口一 
ドして先頭から実行。 

RUN “ファイル名”⑬ 

RUN “ファイル名”⑬ 

RUN “ファイル名" 

中断したプログラムを 
再開。 

CONT 

CONT 

CONT 

指定の位置でプログラ 
ムを中断する。 




中断したプログラムの 
所から指定ステップ実 
行。 




プログラムを全部抹消。 

NEW 

NEW 

NEW 

BASIC のモードを切り 
替える。 


NEW ON ディツプスイツチの状態 

CMD UNLINK (SFO 


BASIC プログラムの格 
納開始アドレスを変更。 




トレースモードに入る 
(実行中の行番号を画 
面に表示）。 

TRON 

TRON 

TRON 

ト レースモー ドに入る 
(行番号はプリンタに 
出力)。 




トレースモードから抜 
ける。 

TROFF 

TROFF 

TROFF 

モニタに入る。 

MON 

MON 


IPL を起動する。 


(NEW ON モード） 


リストを画面に表示。 

LIST 〔範囲〕 

LIST 〔範囲〕 

LIST 〔範囲〕 

プリンタにリストを出 
力。 

LUST ⑽囲〕 

LUST 〔範囲〕 

LUST 〔範囲） 

指定ファイル（デバイ 
ス）にリストを出力。 




’の後だけリストを画面 
に表?!^。 




’の後だけリストをプリ 
ンタに出力。 




•の後だけリストをファ 
イル（デバイス）に出力。 




リスト出力時の範囲の 
デフォルトを指定する。 




行番号を自動発生する。 

AUTO 〔開始行〕〔，增分〕 

AUTO 〔開始行〕〔，增分〕 

AUTO 〔開始行〕〔，增分〕 

•付きの行番号を自動発 
生する。 




指定行をエディットす 
る。 


EDIT 行番号⑬ 


エディツトモードに入 
る。 


EDIT 行番号® 



1 


分類 


一般コマンド 
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注この DATA LIST は4ぺージ単位で構成されています。偶数ページ欄外は見開き2ページで説明されているコ 
マンド，ステートメントです。比較した BASIC は， N - BASIC , N 88 BASIC , MSX-BASIC VI . 0, F-BASIC V 3.0, 
HuBASIC ( MZ -700/ XI ), BASIC - M 25/ S 25, S - BASIC , SHARP BAS 1 C です。 


F-BASIC V3.0 (FM-7 ほか） 

n ••，ディスク版にのみ存在 

HuBASIC (MZ-700) 

HuBASIC(X1- XI turbo ) 

① CZ-8CB01 VI. 0 (3)CZ-8CB01 V2.0, CZ-8FB01 V2.0 

② CZ-8FB0! VI. 0 ④ CZ-8FB02 VI. 0 にのみ存在 

RUN 

RUN 

RUN 

RUN 行 番号 

RUN 行 番号 

RUN 行番号 

RUN “ ファイル名” 

RUN “ ファイル名" 

RUN •ファイル名” 

CONT 

CONT 

CONT 

NEW 

NEW 

NEW 

NEW ON モード③④ 


NEW ON アドレス 

NEW ON アドレス 

TRON 

TRON 

TRON 

TROFF 

TROFF 

TROFF 

MON 

MON 

MON 


BOOT 

BOOT 

LIST 〔範囲〕 

LIST 〔範囲〕 

LIST 〔範囲〕 

LUST 〔範囲〕 

LUST 〔範囲〕 

LUST 〔範囲〕 

LIST" ファイル名”！:，範囲〕 

LIST "ファイル名"〔，範囲〕 

LIST “ ファイル名"〔，範囲〕 

LIST * 〔範囲〕 ④ 

LUST ホ 〔範囲〕 ④ 

LIST* “ ファイル名"〔，範囲〕④ 

LIST@ 〔範囲〕 ④ 

AUTO 〔開始行〕 〔，增 分〕 

AUTO 〔開始 行〕 〔，増分〕 

AUTO 〔開始行〕〔.増分〕 

AUTO * 〔開始行〕〔.増分〕④ 

EDIT 行 番号 

EDIT 〔行 番号〕 

EDIT (行 番号〕 

EDIT 〔行番号〕 ④ 
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RUN CLRrRUN 〇 ONT STOP STEP NEW NEW ON TRON TR し ON TRON/P TROFF MON BYE BOOT 
し 1 ST しし 1 ST LIST/P AUTO EDIT 



BASIC-M25 (MZ-2500) 


BASIC - S 25( MZ -2500) 


S-BASIC(MZ-700/1500) 

① MZ-700 テープ版 ( 付属） 

(D MZ-700 OD.Disk 版 
③ MZ-1500 QD.Disk 版にのみ存在 


RUN 

RUN 

RUN 

RUN 行番号 

CLR ： RUN 行番号 

CLR ： RUN 行番号 

RUN " ファイル名 ” 

RUN " ファイル名 ” 

RUN “ ファイル名 ” 

CONT 

CONT 

CONT 

STOP 行番号 

STOP 行番号 

- 

STEP 〔行数〕 

STEP 〔行数〕 


NEW 

NEW 

NEW 

NEW ON モード 

NEW ON モード 

NEW ON モード③ 

TRON 〔範囲〕 

TRON 〔範囲〕 

TRON ③ 

じ TRON 〔範囲〕 

LTRON 〔範囲〕 

TRON/P ③ 

TROFF 

TROFF 

TROFF (D 

MON 

MON 

BYE 

BOOT 

BOOT 

BOOT 

LIST 〔範囲〕 

LIST 〔範囲〕 

LIST 〔範囲〕 

LUST 〔範囲〕 

LIST/P 〔範囲〕 

LIST/P 〔範囲〕 

LIST “ ファイル名 " 〔 . 範囲〕 

LIST “ ファイル名 ” 〔，範囲〕 


LIST* 〔範囲〕 

LIST* 〔範囲〕 


LUST * 〔範囲〕 

LUST* 〔範囲〕 


LIST* “ ファイル名 ” 〔，範囲〕 

list* “ ファイル名 ” 〔，範囲〕 


AUTO 〔開始行〕〔，增分〕 

AUTO 〔開始行〕〔 . 増分〕 

AUTO 〔開始行〕〔，增分〕 

AUTO 氺 

AUTO* 


EDIT 〔行番 • 号〕 

EDIT 〔行番号〕 


edit 〔行番号〕 

EDIT 〔行番号〕 
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RUN 


CLR ： RUN 行番号 

RUN “ファイル名，’②⑤⑥ 

CONT 


NEW 


{BYE ⑧ 1 

Imon ①-⑥ J 

BOOT ①〜⑥ 
LIST 〔範囲〕 
LIST / P 〔範囲〕 


AUTO 〔開始行〕〔，増分〕①〜⑥ 


プログラム中で使っても意味がないので，出てこない。 


プログラム中で使っても意味がないので，出てこない。 


プログラム中で使っても意味がないので，出てこない。 


シャープ系の RUN 行番号は GOTO 行番号と同じように変数をクリアしないので同じ意味にす 
るには CLR を付ける必要がある。 

同じような働きをするものに ， LOAD “ファイル名”， R と CHAIN “ファイル名”がある。 
プログラム中で使われることはない。 

プログラム中で使われることはない。 

プログラム中で使われることはない。 


N «8 の NEW ON は N 88 BASIC と N - BASIC , 画面モード等を変えるのに対し，その他では BASIC 
等の一部機能をカツトする （CMD UNUNK はサウンド用の CMD 文をカツトする）。 

マシン語関連(移植困難)。ただしプログラム中で使われることはない。 


HuBASIC 等はリスト出力後プログラムが止まらない（マイクロソフトでは止まる）ので，プロ 
グラム中に出てくることもある。 

HuBASIC 等はリスト出力後プログラムが止まらない（マイクロソフトでは止まる）ので，プロ 
グラム中に出てくることもある。 

範囲を省略すると SAVE “フアイル指定"， A と同意になる。 


簡易ワープロのように使える命令。メッセージ出力用に PRINT 等の代わりに使うことがあるかも 
しれないが，これがない BASIC では本来の PR 旧 T 文等に戻す。 


主にコマンドの使ぃやすさを図るためのものなので，プログラム中には出てこなぃ。 

プログラム中で使われることはない。 

プログラム中で使われることはない。 

プログラム中で使われることはない。 

プログラム中で使われることはない。 


プログラムを先頭から 
実行。 


変数を消してプログラ 
ムを途中から実行。 

指定プログラムをロー 
ドして先頭から実行。 

中断したプログラムを 
再開。 

指定の位置でプログラ 
ムを中断する。 

中断したブログラムの 
所から指定ステップ実 
行。 

プログラムを全部抹消。 

BASIC のモードを切り 
替える。 

BASIC プログラムの格 
納開始アドレスを変更。 


トレースモ ー* ドに入る 
(実行中の行番号を画 
面に表示）。 

トレースモードに入る 
(行番号はプリンタに 
出力）。 

トレースモー ド カ、 ら抜 
ける。 

モニタに入る。 


IPL を起動する。 


リストを画面に表示。 


プリンタにリストを出 
力。 

指定ファイル（デバイ 
ス）にリストを出力。 

’の後だけリストを画面 
に表不。 

•の後だけリストをプリ 
ンタに出力。 

•の後だけリストをファ 
イル（デバイス）に出力。 


リスト出力時の範囲の 
デフォルトを指定する。 

行番号を自動発生する。 


’付きの行番号を自動発 
生する。 

指定行をエディットす 
る 。 

エディットモードに 入 
る。 


SHARP BA e l 广 

(MZ-80K/C/1200/80B/2000/2200) 

⑧ SF -5030 ③ MZ - IZ 00 I ⑤ MZ -2 Z 00 1 

① SB - 5520 4) MZ-I Z 002 落: MZ -2 Z 021 

② SB -6520 にのみ存在 


備 


考 


働き 


般コマンド 


89ページに続く 


付録 BASIC DATA LIST 85 














SEARCH DELETE RENUMTERM ASK FILES LFILES CLOAD LOAD CSAVE SAVE 
CLOAD?LOAD?SKIPF VERIFY CHAIN COMMON MERGE BLOAD LOADM BSAVE SAVEM 


働き 

N- BASIC (PC- 8001 ほか) 

⑰…ディスク版にのみ存在 

NssBASIC ( PC -8801 ほか） 

@"88 SR のサウンド関係の拡張命令 

D …ディスク版にのみ存在 

MSX-BASIC VI. 0 (各社 MSX) 

D …ディスク版にのみ存在 

プログラム中から文字 
列を捜し出し，あった 
行を画面に表示。 




プログラム中から文字 
列を捜し，プリンタに 
その行を出力。 




プログラムの一部分を 
削除する。 

DELETE 範囲 

DELETE 範囲 

DELETE 範囲 

行番号を付けなおす。 

RENUM 〔新行番号〕〔，〔旧行番号〕〔，，増分〕〕 

RENUM 〔新行番号〕〔，〔旧行番号〕〔.増分〕〕 

RENUM 〔新行番号〕〔，〔旧行番号〕〔，増分〕〕 

ターミナルモードに入 
る。 

TERM バラメータ 

TERM •‘パラメータ”〔，〔モード〕〔，変数領域 
の大きさ〕〕 


予約語の大文字 • 小文 
字表示を切り替える。 




対話型のテレビタイマ 
予約を行う。 




登録されているファイ 
ルを表示。 

FILES 〔ドライブ番号〕® 

FILES 〔ドライブ番号〕⑬ 

FILES 〔“デバイス名”〕⑬ 

登録されているファイ 
ルをプリンタに出力。 

LFILES 〔ドライブ番号〕⑬ 

LFILES 〔ドライブ番号〕® 

LFILES 〔“デバイス名”〕⑬ 

BASIC のブログラムを 
カセットからロード。 

CLOAD “ファイル名" 

LOAD “ CAS : ファイル名” 

CLOAD 〔“ファイル名”〕 

BASIC のプログラムを 
〇— ド。 

LOAD ••ファイル名” 〔， R 〕 ⑬ 

LOAD “ファイル名” 〔. R 〕 

LOAD “ファイル名”！:， R 〕 

BASIC のプログラムを 
カセットにセーブ。 

CSAVE “ファイル名” 

SAVE “ CAS : ファイル名" 

CSAVE “ファイル名”〔，ボーレイト〕 

BASIC のプログラムを 
セーブ。 

SAVE “ファイル名 “（. A 〕 ⑬ 

SAVE “ファイル名" ^|AJ| 

SAVE •■ファイル名 "〔. A 〕 

プログラムをベリファ 
イ〇 

CLOAD ? “ファイル名" 

LOAD ? “ CAS : ファイル名" 

CLOAD ? r ファイル名”〕 

変数を保 m しつつプロ 
グラムを a — ドして実 
行（プログラム単位の 
GOTO )。 


CHAINCMERGE 〕** ファイル名”〔，実行開始行番号〕 
〔. ALL〕〔.DELETE 範囲〕⑬ 


CHAIN で受け渡す（ク 
リアしない）変数を指 
定する。. 


COMMON 変数名〔，変数名…〕⑬ 


プログラムを一時的に 
呼び出して実行（プ a 
グラム単位の GOSUB )。 




プログラムを併合する。 

MERGE “ファイル名"® 

MERGE ••ファイル名”⑬ 

MERGE “ファイル名” 

マシン語プログラムを 
ロー ドする。 


BLOAD “ファイル名”〔.〔口ードアドレス〕 〔. R 〕〕 

⑬ 

BLOAD “ファイル名” 〔. R 〕 

〔.オフセットアドレス〕 

マシン語プ a グラムを 
セーブする。 


BSAVE “ファイル名”，セーブ開始アドレス， 

長さ⑬ 

BSAVE “ファイル名”，セーブ開始アドレス， 
セーブ終了アドレス〔.実行開始アドレス〕 

グラフイック画面の内 
容をロー ドする。 





分類 


一般コマンド 


ファイル操作 n マン K (ステ ー トメン 
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F-BASIC V3.0 (FM-7 ほか） 

D …ディスク版にのみ存在 

HuBASIC ( MZ -700) 

Hu BASIC (XI -XI turbo) 

1CZ-8CB01 VI. 0 ；3 C2-8CB01 V2.0, CZ 8FB01 V2.0 

2：=CZ-8FB01 VJ.O 14)CZ 8FB02 VI.0 にのみ存在 


SEARCH “文字列” 

SEARCH “文字列” 

DELETE 範囲 

DELETE 範囲 

DELETE 範囲 

RENUM 〔新行番号〕〔,〔旧行番号〕〔.料〕〕 

RENUM 〔新行番号〕〔，〔旧行番号〕〔，増分〕〕 

RENUM 〔新行番号〕〔，〔旧行番号〕〔，增分〕〕 

TERM “パラメータ” 


ASK 

FILES 〔“デバイス名”〕 

FILES 〔“デバイス名"〕 

FILES 〔“デバイス名”〕 

FILES 〔**デバイス名" 〕〔,L〕 

LFILES 〔"デバイス名”〕 

LFILES 〔“デバイス名〕 

LOAD〔"CAS: ファイル名”〕 

LOAD 〔“ファイル名"〕 

LOAD〔“CAS: ファイル名"〕 

LOAD 〔**ファイル名”〕 〔，R〕 

LOAD 〔“ファイル名"〕 

LOAD 〔“ファイル名"〕 

SAVE **CAS: ファイル名” 

SAVE 〔“ファイル名”〕 

SAVE〔“CAS: ファイル名"〕 

SAVE u ファイル名” [fAjj 

SAVE (“ファイル名”〕〔，八〕 

SAVE 〔“ファイル名”〕〔， A〕 

LOAD? 〔“ファイル名”〕 

または SKIPF 〔“ファイル名"〕 

LOAD? 〔“ファイル名"〕 

または VERIFY〔 tt ファイル名"〕 

LOAD? 〔“ファイル名”〕 

または VERIFY 〔"ファイル名”〕 

CHAIN〔MERGE〕 “ファイル名”〔，実行開始行番 
号〕 〔.ALL〕〔.DELETE 範囲〕⑬ 


CHAIN ••ファイル名" 

COMMON 変数名〔.変数名…〕⑬ 


(自動的に全変数が受け渡される） 



CHA 旧で代用 

MERGE 〔"ファイル名”〕 

MERGE 〔“ファイル名”〕 

MERGE 〔“ファイル名”〕 

LOADM" ファイル名"〔，〔オフセツトアドレス〕 

〔.R〕〕 

LOADM “ファイル名"〔，〔口ードァドレス 〕〔，R〕〕 

LOADM ••ファイル名"〔.〔ロードアドレス〕〔, R〕〕 

SAVEM “ファイル名"，セーブ開始アドレス， 
セーブ終了アドレス，実行開始アドレス 

SAVEM “ファイル名”，セーブ開始アドレス， 
セーブ終了アドレス〔，実行開始アドレス〕 

SAVEM** ファイル名”，セーブ開始アドレス，セーブ終了アドレス 
〔，実行開始ァドレス〕 
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SEARCH し SEROH SEARCH/P DELETE RENUM TERM OPTION し 1ST FI し ES DIR し FILES DIR/P LOAD SAVE 
VERIFY CHAIN COMMON SWAP MERGE APPEND B し OAD BSAVE G し OAD 


BASIC-M25 (MZ-2500) 

BASIC-S25(MZ-2500) 

S-BASIC(MZ-700/1500) 

① MZ -700 テープ版(付属） 

② MZ -700 QD . Disk 版 

③ MZ -1 500 OD . Disk 版にのみ存在 

SEARCH "文字列"〔，範囲〕 

SEARCH ** 文字列"〔.範囲〕 

SEARCH “文字列" 

LSEARCH “文字列"〔，範囲〕 

SEARCH / P * •文字列”〔，範囲〕 


DELETE 範囲 

DELETE 範囲 

DELETE 範囲 

RENUM 〔新行番号〕〔，〔増分〕〔，範囲〕〕 

RENUM 〔新行番号〕〔，〔増分〕〔，範囲〕〕 

RENUM 〔新行番号〕〔，〔旧行番号〕〔，増分 : U 

TERM "バラメータ" 

TERM “パラメータ" 


OPTION UST fUCASEl 
\LCASEJ 

OPTION UST fUCASEl 
\LCASE j 


FILES 〔"デバイス名"〕 

dir r デバイス名"〕 

DIR 〔デバイス名〕または D 旧〔“デバイス名”〕 

LFILES 〔"デバイス名"〕. 

DIR / P 〔“デバイス名”〕 

DIR / P 〔デバイス名〕または DIR/P 
〔“デバイス名”〕 

LOAD “ CMT : ファイル名” 

LOAD “ CMT : ファイル名，， 

LOAD 〔“ CMT : ファイル名"〕 〔, A ②③〕 

LOAD "ファイル名" 

LOAD ••ファイル名” 

LOAD 〔“ファイル名”〕 



SAVE “ CMT : ファイル名” 

SAVE “ファイル名”し A 〕 

SAVE "ファイル名"〔， A 〕 

SAVE “ファイル名〔， A ②③〕 



VERIFY 〔“ファイル名”〕 

GHAIN 〔 MERGE 〕 ••ファイル名"！:，実行開始行番号〕 

〔, ALL〕〔.DELETE 範囲〕 

CHAIN 〔 MERGE 〕 “ファイル名，’ 

〔，実行開始行番号〕 〔, ALL 〕 

〔， DELETE 範囲〕 

CHAIN “ファイル名”②③ 

COMMON 変数名〔，変数名…〕 

COMMON 変数名〔，変数名…〕 

(自動的に全変数が受け渡される②③） 

CHAIN で代用 

SWAP “ファイル名" 

SWAP “ファイル名"②③ 

MERGE “ファイル名” 

MERGE “ファイル名" 

MERGE “ファイル名"〔， A 〕 

BLOAD * 4 ファイル名"！;，ロードアドレス〕 

LOAD “ファイル名’’〔，ロードアドレス〕 

LOAD “ファイル名” 

BSAVE "ファイル名"，セーブ開始ァドレス，長さ〔，〔実行開始ァドレス〕 

〔，ロー ド時アドレス〕〕 

SAVE “ファイル名”，セーブ開始アドレス，長さ 
〔，〔実行開始アドレス〕〔，ロード時アドレス〕〕 

(モニタで行う） 

GLOAD “ファイル名” 〔，（右，； y ,)〕 

GLOAD “ファイル名’’〔，右，妒〕 
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SHARP BASIC 

( MZ -80 K / C /1200/80 B /2000/2200) 

(OJ SP - 5030 a MZ - IZ 00 I ：5； MZ -2 Z 00 I 
(D SB -5520 4 MZ - IZ 002 ⑥ MZ -2 Z 02 I 

② SB -6520 にのみ存在 

備 考 

働き 

SEARCH “文字列”〔，範囲〕⑥ 

プログラム中で使われることはない。 

プログラム中から文字 
列を捜し出し，あった 
行を画面に表示。 

SEARCH/P "文字列"〔，範囲〕⑥ 

プログラム中で使われることはない。 

プログラム中から文字 
列を捜し，プリンタに 
その行を出力。 

DELETE 範囲 ⑥ 

まれに Hu BASIC 等では PCG のセットのように一度しか使わない部分をこれでカットし，あらか 
じめ KEY 〇文でセットしておいた “GOTO "等でプログラムの実行を再開することがある（変 
数やマシン語のエリアが足りな〔、ときに出て来ることがある）。 

プログラムの一部分を 
削除する。 

RENUM 〔新行番号〕〔.〔増分〕〔，範囲〕〕 ⑥ 

プログラム中で使われることはない。 

行番号を付けなおす。 


プログラム中で使われることはない。 

ターミナルモードに入 
る 。 


プログラム中で使われることはない。 

予約語の大文字 • 小文 
字表示を切り替える,， 



対話型のテレビタイマ 
予約を行う。 

DIR 〔 FDn 〕（ n は卜4のドライブ番号） ②⑤⑥ 

ファイルの名を入力するとき，参考のためにプログラム中で使われることもある （SHARP 
BASIC では取つてしまうこと）。 

登録されているファイ 
ルを表示。 

DIR / P 〔 FDn 〕（ n は卜4のドライブ番号）②⑤⑥ 


登録されているファイ 
ルをプリンタに出力 u 

LOAD / T 〔"ファイル名"〕 ①一⑥ 

， R を付けるとそのまま実行に移るので，プログラム中で使われることがある。その場合は CHAIN 
文に変更する。 CAS : や CMT :. / T はテープ版では省略可。 A は S - BASIC 特有で， SAVE ~. A で 
セーブしたものを口ードするもの。 

BASIC のプログラムを 
カセツトから口ー ド。 

LOAD “ファイル名” 


BASIC のプログラムを 

ロード。 

SAVE/T “ファイル名" ①一⑥ 

MSX のボーレイトは丨で1200ボー，2で600ポー。 

BASIC のプログラムを 
カセツトにセーブ。 

SAVE “ファイル名” 

， A を付けるとアスキーセーブする。 . P を付けるとプロテクトをかけてセーブする（それをロー 
ドするとリスト，セーブできない）。 

BASIC のブログラムを 
セーブ。 

VERIFY 〔“ ファイル名”〕 


ブログラムをベリファ 

:ィ。 

CHAIN “ファイル名”②⑤⑥ 

ALL 指定のできる BASIC では. ALL を付けると全変数が受け渡されるが，省略すると COMMON 
文で指定した変数のみが受け渡される。その場合 COMMON がなければ全変数がクリアされる 
ので， ALL 指定のできない（自動的に全変数が受け渡される） BASIC では， CHAIN でなく RUN 
"ファイル名”を使っても良い。また実行開始行番号が指定されているブログラムをそれができ 
ない BASIC に移植する場合は， CHAIN 前に XX = 999 のようにしておき， CHAIN した先のプログ 
ラムで IF XX = 999 THEN 1000のようにする。つまり変数を途中からスタートさせるためのフ 
ラグにする （ CLEAR か LIMIT で確保したマシン語エリアで POKE . PEEK しても良い）。 

変数を保護しつつプロ 
グラムをロー ドして実 
行（プログラム単位の 
GOTO )。 

(自動的に全変数が受け渡される②⑤⑥） 

受け渡す変数を限定して，メモリのフリーエリアを少しでも広くするために使われる。 

CHAIN で受け渡す（ク 
リアしない）変数を指 
定する。 

SWAP “ファイル名" ②⑤⑥ 

CHAIN で代用する方法： SWAP そのものは CHAIN ( M 25 では ALL を付ける）に置き換える 。 SWAP 
した先では END かプログラムの末尾でもとのプログラムに戻るので，もとのブログラムの途中 
から実行するような CHAIN 文を置く（ X 1 / turbo では CHAIN の項参照）。 

プログラムを一時的に 
呼び出して実行（プロ 
グラム単位の GOSUB )。 

APPEND “ファイル名” ②⑤⑥ 

S - BASIC の， A はアスキーセーブされたものが対象であることを示す。 

プログラムを併合する。 

LOAD ** ファイル名" 

マシン語ブログラムは，ロードすることができても移植にはマシン語の知識が必要。 

マシン語プログラムを 
口ー ドする。 

(モニタで行う） 

售 

マシン語ブログラムを 
セーブす る。 



グラフィツク画面の内 
容をロードする。 


分類 


一般コマンド 


ファイル操作コマンド(ステ—トメント) 
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MOUNT REMOVE LET DEFINT DEFSNG DEFDB し DEFSTR DEF FN DIM 
OPTION BASE ERASE REM ’RANDOMIZE 


— 

N- BASIC (PC- 8001 ほか） 

⑫…デイスク版にのみ存在 

NssBASIC (PC-8801 ほか） 

. (| Q >.88 SR のサウンド関係の拡張命令 

D …ディスク版にのみ存在 

MSX-BASIC VI. 0 ( 各社 MSX) 

® …ディスク版にのみ存在 

グラフィック画面の内 
容をセーブする。 




クイックディスクの全 
内容を 64 KRAM カード 
にロードする。 




64 KRAM カードの全内 
容をクイックディスク 
にセーブす る。 




ディスクの使用を始め 
る。 

MOUNT 〔ドライブ番号〕® 

(不要) 

(不要) 

ディスクの使用を終了 
する。 

REMOVE 〔ドライブ番号〕⑬ 

(不要） 

(不要) 

変数に値を代入する。 

〔 LET 〕 変数名=値 

〔 LET 〕 変数名=値 

〔 LET 〕 変数名=値 

指定の英字から始まる 
変数のデフォルトの型 
を整数にする。 

DEFINT 英字〔英字〕〔，…〕 

DEFINT 英字〔-英字〕し…〕 

DEFINT 英字〔英字〕〔，…〕 

指定の英字から始まる 
変数のデフォルトの型 
を単精度にする。 

DEFSNG 英字〔-英字〕〔，…〕 

DEFSNG 英字〔-英字〕し…〕 

DEFSNG 英字〔-英字〕[，•••〕 

指定の英字から始まる 
変数のデフォルトの型 
を倍精度にする。 

DEFDBL 英字〔-英字〕〔，…〕 

DEFDBL 英字〔-英字〕〔,"•〕 

DEFDBL 英字〔-英字〕〔，…〕 

指定の英字から始まる 
変数のデフォルトの型 
を文字型にする。 

DEFSTR 英字〔-英字〕〔，...〕 

DEFSTR 英字〔-英字〕〔，“.〕 

DEFSTR 英字〔-英字〕〔，…〕 

ユーザー関数を定義す 
る。 

DEF FN 関数名〔（仮引数〔，…〕）〕=式 

DEF FN 関数名〔(仮引数〔，…〕）〕=式 

DEF FN 関数名〔(仮引数〔，…〕）〕=式 

配列を宣言する。 

DIM 配列名（添字の最大値〔，…〕）〔，配列名…〕 

DIM 配列名（添字の最大値〔，…〕）〔，配列名…〕 

DIM 配列名（添字の最大値〔，…〕）〔，配列名…〕 

配列の下限の添字を0 
か1にする。 


OPTION BASE [ 0 J 


配列を消去する。 

ERASE 配列名〔，配列名…〕 

ERASE 配列名〔，配列名…〕 

ERASE 配列名〔，配列名…〕 

角度の単位を変更する。 




注釈を置く （ステート 
メントに続けるには前 
に：が必要）。 

REM 〔注釈〕 

REM (注釈〕 

REM 〔注釈〕 

注釈を置く （ステート 
メントに続けるときも 
:は不要)。 

’〔注釈〕 

〔注釈〕 

' 〔注釈〕 

乱数の発生系列を変更 
する。 


RANDOMIZE 〔系歹 IJ 〕 



分類 ファイル操作コマンド(ステ—トメント) 


投ステートメン ■ 
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F-BASIC V3.0 (FM-7 ほか） 

ディスク版にのみ存在 

HuBASIC (MZ-700) 

HuBASIC(X1.X1 turbo) 

l；CZ-8CB01 VI.0 ③ CZ-8CB01 V2.0, CZ-8FB0I V2.0 

② CZ-8FB01 VI. 0 ④ CZ-8FB02 V 1.0 にのみ存在 

(不要） 


(不要) 

(不要） 


(不要） 

〔 LET 〕 変数名=値 

〔 LET 〕 変数名=値 

〔 LET 〕 変数名=値 

DEFINT 英字〔-英字〕〔，…〕 

DEFINT 英字(:英字〕〔，…〕 

DEFINT 英字〔英字〕レ"〕 

DEFSNG 英字〔英字〕〔，…〕 

DEFSNG 英字〔-英字〕〔，…〕 

DEFSNG 英字〔-英字〕〔,••，〕 

DEFDBL 英字〔英字〕〔，…〕 

DEFDBL 英字〔英字〕〔，…〕 

DEFDBL 英字〔英字〕〔，…〕 

DEFSTfl 英字〔英字〕（.…〕 

DEFSTR 英字!:英字〕〔，…〕 

DEFSTR 英字!:-英字〕!:，…〕 

DEF FN 関数名〔(仮引数〔.…〕）〕=式 

DEF FN 閲数名〔(仮引数〔，…〕）〕=式 

DEF FN 関数名〔(仮引数〔，…〕）〕=式 

DIM 配列名（添字の最大値〔，…〕）〔，配列名…： 

DIM 配列名（添字の最大値〔.…〕）〔，配列名…： 

DIM 配列名（添字の最大値〔.…〕〉〔.配列名…〕 


OPTION BASE f 01 

OPTION BASE f 0 1 

ERASE 配列名〔.配列名…〕 


ERASE 配列名〔，配列名…〕④ 

REM 〔注釈〕 

REM (注釈〕 

REM 〔注釈〕 

’〔注釈〕 

’〔注釈〕 

’〔注釈〕 

RANDOMIZE 〔系列〕 


RANDOMIZE 〔系列〕 
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[Zj 


GSAVE LOAD A しし SAVE A しし LET DEF INT DEF SNG DEF DB し DEF STR DEF 
FN DIM OPTION BASE ERASE OPTION ANGLE REM ’ RANDOMIZE 


BASIC - M 25 ( MZ -2500) 

BASIC - S 25( MZ -2500) 

S - BASIC ( MZ -700/1500) 

0 MZ -7 OO テープ 版(付属） 

② MZ -700 OD . Disk 版 

③ MZ - l 5000 D . Disk 版 にの み存在 

GSAVE “ファイル名 "〔， U , >)-(>,>)〕 

GSAVE フアイル名"〔，ぉ,;^ xe , y ハ 

LOAD A しし （D 

- 


SAVE A しし® 

(不要） 

(不要） 

(不要) 

(不要） 

(不要) 

(不要) 

〔 LET 〕 変数名=値 

〔 LET 〕 変数名=値 

〔 LET 〕 変数名=値 

DEF INT 英字〔英字〕〔，…〕 

DEF INT 英字〔英字〕〔，…〕 

' 

DEF SNG 英字〔英字〕〔，…〕 

DEF SNG 英字〔英字〕〔，…〕 


DEF DBL 英字〔英字〕〔，…〕 

DEF DBL 英字〔英字〕〔，…〕 


DEF STR 英字！：英字〕〔，…〕 

DEF STR 英字〔英字〕〔，…〕 


DEF FN 関数名〔(仮引数〔，… ）〕= 式 

DEF FN 関数名〔(仮引数〔，…〕)〕=式 

DEF FN 関数名〔（仮引数〔，…〕）〕=式 

DIM 配列名(添字の最大値〔，…〕）〔，配列名…〕 

DIM 配列名（添字の最大値〔，…〕)〔，配列名…〕 

DIM 配列名（添字の最大値〔，…〕）〔，配列名…〕 

OPTION BASE [ 0 J 

OPTION BASE f 0 \ 


ERASE 配列名〔，配列名…〕 

ERASE 配列名〔，配列名…〕 


OPTION ANGLE | RADIANS \ 

\ DEGREES j 

OPTION ANG し E { RADIANS \ 

1 degrees / 

REM 〔注釈〕 

REM 〔注釈〕 

REM 〔注釈〕 

’〔注釈〕 

• 〔注釈〕 

’〔注釈〕 

RANDOMIZE 〔系列〕 

RANDOMIZE 〔系列〕 
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SHARP 

BASIC 


(MZ-80K/C/1200/80B/ 2000 /2200) 

(① SP- 5030 

3 MZ-IZ00I 

(DMZ-2Z00I 

CD SB-5520 

4 MZ-IZ002 

⑥ MZ-2Z02I 

② SB-6520 


にのみ存在 


備 


考 


働き 


グラフィック画面の内 
客をセーブする 

クイックディスクの全 
内容を 64 KRAM 力ード 
にロー ドする 


(不要） 

(不要） 

〔 LET 〕 変数名 


デイスケツトを入れたときと出す前とに必要なもので， FAT の読み書きを行うもの。単純に取 
つてしまつて良い。 


値 


64 KRAM 力ードの全内 
容をクイックディスク 
にセーブする 

ディスクの使用を始め 
る， 

デイスクの使用を終了 
する 


変数に値を代入する。 


REM 〔注釈〕 


DEF FN 関数名（仮引数）=式 


DIM 配列名（添字の最大値〔，…〕）〔，配列名…〕 


S - BASIC , SHARP BASIC では， DEFINT 等はないので，取ってしまう。ただし， DEFSTR が 
使われていた場合は，以後の変数を変更する必要がある。例えば DEFSTR A - C , K , S - V と 
なっていたら • A , B , C , K , S , T , U , V から始まる型指定のない変数（％!#$の付いて 
いない変数）は$を付ける。％! #は通常取ることになるので，例えば AX %, BCD , D ! , G 
R #, HO , J $ という変数は， AX , BCD $, D , GR , HO , J $ に直すことになる。 

なお， CLEAR , RUN 時には， MSX 以外では DEFSNG A Z が， MSX では DEFDBLA Z が自動 
的に実行される。ただし turbo と MZ - 2500の漢字変数名では％等の記号がなければ常に倍精度。 


SHARP BASIC への移植では，引数•結果共に数値型，引数は I 個，関数名は I 文字と，仕様 
が厳しく限定されているため，場合によっては FN を実際に使っている所で展開する必要がある。 
例えば ， DEF FNABC $( A $, B , C ) = LEFT $( RIGHT $( A $, B )，（，）+ B $ で ， PRINT FNABC $ 
( X $, 5, 2) なら ， DEF FN は省略し ， PRINT LEFTS (RIGHTS ( X $, 5)，2) + 巳$にする。 
FN が使われている所全部でこれを行う。 

SHARP BASIC への移植では，2次元までしか許されない点に注意する。また，添字が255ま 
でしか許されないため，場合によっては次元の変換を行う。例えば DIM A $( 1999)で PRINT A $ 
( X )とあれば ， DIM A $(255,7) で PRINT A $ ( X /8 , X INT ( X /8) *8) とする（代入時も添 
字の変換を行う）。また DIM B ( 5, 2, 8) で PRINT B ( l , J , K ) なら ， DIM B ( I 6 I ) で ， PRINT 
B (1+6*( J +3 * K )) にする。 BASIC 内部では何次元であっても結局は丨次元に変換される 
ので，原理上，次元の変換は可能なことである。 

配列の添字が丨以上しか使わないときは，〇の分を確保しないことでメモリが少しだけ節約で 
きるよう OPTION BASE I としているが，単に取ってしまって良い。 

DIM と反対の働きをするステートメント。 ERASE の主な使い方は3つある。丨つは不要になっ 
た配列を消して，フリーエリアを増やすこと。この場合はメモリが足りなくなる可能性はある 
が，単に ERASE 文を取ってしまう。次に， I 度 ERASE して，次に前回と同じ条件（大きさ • 
次元）の DIM を行う場合。この時は配列の各要素を0または“”にするのが目的なので ， ERASE 
を FOR A = OTOIOOO ： A (|)=0 : NEXT のようなものに置き換える。 HuBASIC ではさらに， 

2度目の DIM を実行しないよう， DIM を取るか DIM を通らないようにプログラムを一部変更する。 
最後の ERASE の目的は，要素の数をその場に応じて動的に割り当てることである。この場合は， 
考え得る最大の添字で DIM しておき， ERASE は取る。 HuBASIC ではさらに DIM を2回以上実 
行しないよう，プログラムの流れを変更する。 

OPTION ANGLE DEGREES では SIN 等の関数と CIRCLE の角度の単位力《「度」になる 0 

S _ BASIC と SHARP BASIC では.注釈の中に：を入れることはできない。逆に言うと，それら 
では， REM 文の後に，：で区切って実行文を置くことができるが、その他ではできない。 

S 等では：を取るか；などに変える。その逆ではマルチステートメントでなく，次の行に実行文 
を置く n 

SHARP BASIC では，行の先頭では REM に，行の途中では： REM に変える u 


この命令のない BASIC では単に取るだけで良い（まず問題はない）。 


指定の英字から始まる 
変数のデフォルトの型 
を整数にする。 

指定の英字から始まる 
変数のデフォルトの型 
を単精度にする。 

指定の英字から始まる 
変数のデフォルトの型 
を倍精度にする。 

指定の英字から始まる 
変数のデフォルトの型 
を文字型にする。 

ユーザー関数を定義す 

る.， 


配列を宣言する 


配列の下限の添字を0 
か丨にする。 

配列を消去する。 


角度の単位を変更する.、 


注釈を置く （ステート 
メントに続けるには前 
に：が必要）.. 

注釈を置く （ステート 
メントに続けるときも 
:は不要）.. 

乱数の発生系列を変更 
する.. 


分類 


ファイル操作コマンド(ステ—トメント) 


般ステ—トメン- 


97ページに続く 


付録 BASIC DATA LIST 93 
























働き 


変数.配列.ユーザー 
関数等をクリアする。 


文字バッファの大きさ 
を指定したり BASIC の 
使用エリアを制限して 
マシン語エリアを確保 
したりする。 

変数の内容を交換する。 

文字変数の一部の文字 
列を置き換える。 


画面にデータを表示す 
る。 


プリンタにデータを出 
力する。 


画面にデータを表示す 
る （ PRINT と少し違う）。 


キーボードよりデータ 
を入力するしで区切 
る)〇 


キーボードよりデータ 
を入力するしで区切 
らない…文字変数専用 X 


プログラム中のデータ 
を変数に読み込む。 

データを置く。 


データの読み取り位置 
を指定する。 

指定行に実行を移す。 

サブルーチンを呼び出 
す。 

サブルーチンから帰る。 


条件により処理を変え 
る。 


N - BASIC (PC-8001 ほか ) 

D …デイスク版にのみ存在 


CLEAR 


CLEAR 


MSX-BASIC VI. 0 ( 各社 MSX) 

D …ディスク版にのみ存在 

CLEAR 


CLEAR 〔文字バッファの大きさ〕〔，アドレス CLEAR 〔文字バッファの大きさ〕〔，〔アドレ CLEAR 〔文字バッファの太*; * 1〔アドレス] 

ス〕 ス〕〔•スタックの大きさ〕〕 ’ 


SWAP 変数名，変数名 SWAP 変数名，変数名 SWAP 変数名，変数名 

MID $ (変数名,位置〔，長さ〕）=“文字列” MID $ (変数名，位置〔，長さ〕）=“文字列" MID $ (変数名，位置〔，長さ〕）=“文字列” 


PRINT 


f TAB (位置） 

|SPC (スペース置 ） j 


し PRINT 


PRINT 


し PRINT 


( TAB (位置） 

SPC (スペース置） 
[式 


TAB (位置） 

SPG (スペース置） 
式 


PRINT 


| TAB (位置） 

SPC (スペース量） 
t 式 


TAB (位置） 

SPC (スペース置） 

式 J 


{[ Zt } using ''^" ; 1 {:} M ] = U USING " 書式’.：式 [{;} H ] 1™}^° ..害式"；式 mu 式.1 

ran]]® 

_待ち時 f 


INPUT 〔“ メッセージ”；〕変数名〔，変数名…〕 


WRITE I 


INPUT 〔 WAIT 待ち時間，〕 

メッセージ” Ml 変数名〔，変数名…〕 


LINE INPUT r メッセージ”;〕文字変数名 

READ 変数名〔，変数名…〕 

DATA 〔データ〔，データ…〕〕 

RESTORE 〔行番号〕 

GOTO 行番号 
GOSUB 行番号 

RETURN 


LINE INPUT〔WAIT 待ち時間，〕 
[“メッセー m 文字変数名 


READ 変数名〔,変数名…〕 

DATA 〔データ〔，データ…〕〕 

RESTORE 〔行番号〕 

GOTO 行番号 
GOSUB 行番号 

RETURN 〔行番号〕 


鬥ぼ 卜}] 


[ELSE |ステートメ : 
I 丨行番号 


}] 


INPUT 〔“メッセージ”；〕変数名〔，変数名…〕 


LINE INPUT 〔“メッセージ”;〕文字変数名 

READ 変数名〔，変数名…〕 

DATA 〔データ〔，データ…〕〕 

RESTORE 〔行番号〕 

GOTO 行番号 
GOSUB 行番号 

RETURN 〔行番号〕 


IF 条件 

THEN f ステートメント| 
1行番号 / 

IF 条件 （THEN J ステートメント1 


IF 条件 

THEN { ステートメント H 


1 行番号 1 



1 行番号 J } 


GOTO 行番号 

1 GOTO 行番号 



GOTO 行番号 J 


[ELSE f ステートメン 
[ 丨行番号 


}] 


NssBASIC (PC-8801 ほか ) 

( SRU 8 SR のサウンド閒係の拡張命令 
P …デイスク版にのみ存在 


TAB (位置） 

SPC (スペース量） 
式 



|〇し EAR 〇し R LIMIT SWAP MID $ PRINT LPRINT USING WRITE INPUT LINE 
1 INPUT し INPUT READ DATA RESTORE GOTO GOSUB RETURN IF 〜 THEN 〜 ELSE 


分類 


般ステ—トメン. 
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F-BASIC V3.0 (FM-7 ほか） 

心…デイスク版にのみ存在 

CLEAR 


HuBASIC (MZ-700) 


CLEAR または C し R 


HuBASIC ( XI - 

XI turbo ) 


1.CZ-8CB01 VI.0 

3 CZ-8CB01 

V2.0, CZ-8FB01 V2.0 

2CZ8FB01 VI.0 

4 CZ-8FB02 

VI.0 にのみ存在 


C し EAR または C し R©(D(D 


CLEAR 〔文字 ^ ッファの大きさ〕〔，アドレス〕 CLEAR アドレスまたは LIMIT アドレス 


CLEAR アドレスまたは LIMIT アドレス①②④ 


SWAP 変数名，変数名 

MID$ (変数名,位置〔.長さ〕）=“文字列" 


SWAP 変数名.変数名 

MiD$ (変数名,位置〔，長さ〕）=“文字列” 


SWAP 変数名，変数名 

MIDS (変数名，位置〔，長さ〕）=“文字列” 


PRINT 


(TAB (位置） 

1 SPG ( スペース置 ） j 


| TAB (位置） 
j SPG ( スペース置 ） j 


PRINT 


し PRINT 


[TAB (位置） 

jsPC ( スペース量 ） j 


TAB (位置） 

SPG ( スペース量） 

式 J 


PRINT 


(TAB (位置） 

SPC ( スペース量） 
1式 


( TAB (位置） 

SPC ( スペース置） 
1式 


{ = 式’，:式 [{:} [式…]] { 


PRINT | USING “書式 
LPRINT j 


W [式 似 [式…]]] に = T } ■。••書式" {:} [式 [{:} [式…]]] 



刪 TE [式] [{:}]H 

WRITE 〔式〕[式…} 


INPUT [“ メッセージ " ハ } j 
変数名〔•変数名…〕 

INPUT 「メッセージ 
変数名〔，変数名…〕 

INPUT メッセージ"!；丨 j 変数名〔，変数名…〕 

LINE INPUT 「メッセージ 
文字変数名 

(LINE INPUT | 1“ メ ッセージ 
文字変数名 

{ LINE INPUT 1 TV ッセージ ”ハ 
1 LINPUT J 1 1, 

U 文字変数名 

READ 変数名〔，変数名…〕 

READ 変数名〔，変数名…〕 

READ 変数名(，変数名…〕 


DATA 〔データ〔.データ…〕〕 

DATA 〔データ〔•データ…〕〕 

DATA 〔データ〔，データ…〕〕 


RESTORE 〔行番号〕 

RESTORE 〔行番号〕 

RESTORE 〔行番号〕 


GOTO 行番号 

GOTO 行番号 

GOTO 行番号 


GOSUB 行番号 

GOSUB 行番号 

GOSUB 行番号 


RETURN 〔行番号〕 

RETURN 〔行番号〕 

RETURN (行番号〕 



IF 条件 f THEN f ステートメント j’ 
1行番号 I 

IGOTO 行番号 

鬥ぼン ト H 


IF 条件 


「ELSE 


THENf ステートメント ^ 
I 行番号 1 I 

GOTO 行番号 
GOSUB 行番号 J 

ステートメント 

行番号 JJ 


IF 条件 


THEN j ステートメン 


行番号 
GOTO 行番号 
.GOSUB 行番号 


卜 H 


j^ELSE[ ろ^;ニトメ ' 


\行番号 
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CLEAR 〇し R LIMIT SWAP MID $ PRINT し PRINT PRINT/P USING WRITE INPUT 
LINE INPUT READ DATA RESTORE GOTO GOSUB RETURN IF 〜 THEN 〜 ELSE 



BASIC-M25 (MZ-2500) 


CLEAR 


CLEAR | アドレス’ 
1 MAX 


SWAP 変数名，変数名 

MID $ (変数名，位置〔，長さ〕）="文字列" 


PRINT 


LPRINT 


f TAB (位置） 

SPC (スペース置） 

1式 1 


f TAB (位置） 

| SPC (スペース置 ） j 


[二 }_ “省實 


WRITE 


[ 式 A} [ 式 …]]] 


INPUT 〔 WAIT 待ち時間，〕[“メッセージ” |; jj 変数名〔，変数名…〕 


UNE，NPUT _ T 待ち時間，〕[“メッセ-ジィ]]文字変数名 


READ 変数名〔，変数名…〕 

DATA 〔データ〔•データ…〕〕 

RESTORE 〔行番号〕 

GOTO 行番号 
GOSUB 行番号 

RETURN 〔行番号〕 


IF 条件 f f THEN f ステー 
t 行番号 
GOTO 行番号 
GOSUB 行番号 
「 ELSE / ステートメン 


t 行番号 


}] 


BASIC - S 25( MZ -2500) 


G し R 


LIMIT f アドレス1 
I MAX J 


SWAP 変数名，変数名 

MID $ (変数名，位置〔，長さ〕〕=■•文字列” 


PRINT 


f TAB (位置） ' 

| SPC (スペース量） 


\ PRINT 
1 PRINT/P 


TAB (位置） 

SPG (スペース置） 
式 


} USING " 書式 .V J 


ran]] 

[式 n :} [式1]] 


WRITE 


INPUT 〔 WAIT 待ち時間，〕 

メッセージ変数名〔，変数名…〕 


LINE INPUT〔WAIT 待ち時間，〕 
「“メツセージ " f ；11文字変数名 


'{：}] 

read 変数名〔，変数名…〕 

data 〔データ 〔■データ…〕〕 

RESTORE 〔行番号〕 

GOTO 行番号 
GOSUB 行番号 

RETURN 〔行番号〕 


IF 条件 (THEN f ステートメン| 
I 丨行番号 

1 G 0 T 0 行番号 
i GOSUB 行番号 

PE 齡トメント}] 


S - BASIC ( MZ -700/1500) 

① MZ -700 テープ 版(付属） 

② MZ -700 OD . Disk 版 

③ MZ -1 500 OD . Disk 版にのみ存在 


CLR 


LIMIT ( アドレス 1 
I MAX J 


(代入文で代用） 


PRINT 〔[〔文字色〕〔，背景色〕]〕 


r TAB (位置） 

SPC ( スペース量） 
式 」 


PRINT 


TAB (位置） 

SPC (スペース量） 
式 


PRINT f [〔文字色〕〔，背景色〕]〕 I USING 
1 PRINT/P j 

“鲁式，， {:} [式 [{:} [式…]]] 


input 〔“メッセージ；〕変数名〔，変数名…〕 


READ 変数名〔，変数名…〕 

DATA 〔データ〔，データ…〕〕 

RESTORE 〔行番号〕 

GOTO 行番号 
GOSUB 行番号 

RETURN 


IF 条件 


IF 条件 


•卜 . 


THEN f ステ- 
1行番号 
GOTO 行番号 
GOSUB 行番号 
THEN | ステー トメ： 
i 行番号 
GOTO 柠番号 
GOSUB 行番号 


① 
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C し R 


変数.配列.ユーザー 
関数等をクリアする C 


LIMIT f アドレス1 
[MAX J 


(代入文で代用） 


Ik 


PRINT f } TAB (位置） 

TAB (位置) 


-]]] 


[{：}]， 

※⑧では S PC も使える（意味は他のものと 
同じ） 


PRINT/P [ { TAB (位置)} 

[槪雜置)…]]] 

※⑨では SP 〇も使える 


{PRINT 1 USING “書式" 
I PRINT/P J 
; [式 [ {: } [式…]]] 


INPUT 〔“ メッセージ”；〕変数名〔，変数名…〕 


READ 変数名〔，変数名…〕 

DATA 〔データ〔，データ…〕〕 

RESTORE 〔行番号〕①-⑥ 

GOTO 行番号 
GOSUB 行番号 

RETURN 


IF 条件 


THEN f ステートメ : 

i 行番号 
GOTO 行番号 
GOSUB 行番号 


マイクロソフト BASIC と M 25 では変数クリアを伴う。 MAX とは可能な最大限のアドレス （&H 
FF 0 0 等）を示す。文字バッファとは，マイクロソフト BASIC に特有なもので，文字変数の実 
内容が入る所を示す。 N 88以外では固定長なので最初に指定しておく。 N 88は可変だがその反面 
スタック（他では可変）は固定にしている（文字バッファの大きさの指定は互換性のためだけ 
に用意されている）。国産系はすべて可変なのでこれらは取ってしまって良い。 

SWAP A , 巳なら C=A : A=B : B = C のようにする （ C は使っていない変数を利用）。 

MID $ ( A $, B , C ) = D $ ( C が省略されていれば 255 と考える）なら， E = LEN ( D $) : E = — 
( E >= C )* C -( E < C )* E : F = LEN ( MID $ ( A $, B , 255)) :E =-( E >= F ) * F -( E く F ) 
*E : A $= LEFT $( A $, B - I ) + LEFT $( D $, E )+ MID $( A $, B + E , 255) とする。条件によ 
っては，これよりもっと簡単にすることもできるので，試してみると良い。 


SHARP BASIC の ®~® SPC は SPACE $ に置き換える。また⑧も含め，式と式等の間に；が入って 
いないときは，；を入れる（例 PRINT SPC ( 10) 123 ABC—PRINT SPACE $( 10); 123; ABC )。； は， 
S - BASIC で後に関数が続くときも必要。マイクロソフト BASIC , Hu ， M 25 では数値の後に自動 
的にスペースが丨個入るがその他では入らないので注意（例 PRINT 123;-456は前者は23 
456後者は ^123-456 になる）。画面.プリンタのコントロールコード ( CHR $ (31 以下）の結 
果）が各機種または BASIC またはブリンタによって異なるので注意（特に S-BASIC . SHARP 
BASIC とその他の間では全くと言っていいほど違う）7イクロソフト BASIC では文字も数値も， 
M 25 では数値を画面に表示する際，次の行にまたがってしまう場合には，あらかじめ改行され， 
次の行の先頭から表示を始めるが、その他の場合はまたがって表示される。「，」を使ったとき， 
マイクロソフト BASIC では14桁ごと，その他では10桁ごとの位置から表示される。 


SHARP BASIC は倍精度 BASIC ( SB -5620, SB -6620, MZ - I Z 003, MZ -2 Z 003) でのみ使用 
可能（害式はほぼ同じ）。 Hu , M 25, S 25, S - BASIC では， PRINT , LPRINT ( PRINT / P ) の途中 
から USING 指定にすることもできる。 


不要なスペースは詰め，「；」や「，」の所には 「， j を置き （「； j と 「， j は同意）文字の前後には ， 「"j 
を置く 。 WRITE I , 2;“3”なら丨，2， “3" と表示される （ PRINT 文なら。1一…^2。 

3 (…はスペース約10個）となる） 〇 ただし， WRITE は画面に対してはあまり使われることがない。 

SHARP BASIC ではメッセージを指定するとは表示されない（メッセージは**”でも良い）。 
メッセージを省略すると？^は表示される。それ以外の BASIC では「“メッセージ”，」を指定 L 
た場合のみ？^は表示されない。 WAIT の指定は主にデモ用。 0.1 秒単位で示す待ち時間が過ぎ 
てもデータの入力がないときは次の行（マルチステートメントが続いても無視される）へ実行が 
移る。普通は取ってしまって良い。なお，実行時にただのノ ( CR ) を押すと， N - BASIC や HuBASIC 
では値は保存され，次の文へ。 N 88と M 25 では変数が丨個の場合のみ0または“”が代入され， 

次の文へ。その他，データの個数や型が違う時の処理は各 BASIC によって違うので，実行時に 
正しい値を入力するよう，注意すること。 

S - BASIC , SHARP BASIC ではただの INPUT 文にする。実行時， 「， j を含むデータを入力すると 
きは文字列全体を“〜”で囲む。 HuBASIC ではメッセージの分も変数に代入されてしまうので， 
LINE INPUT “ DATA =”， A $: A $= MID $ ( A $,6 ) のようにする。また ， Hu から他の BASIC では， 
この分の処理をカツトする。 


SHARP BASIC 以外では，データは16進定数等も置ける 。 SHARP BASIC では DATA & HFF な 
どとあったら ， DATA 255のように変えること。 


行番号を指定すると，その行に戻ることができる。つまりサブルーチンのスタックを一段下げ’ 
て GOTO することになる。 S - BASI 〇と SHARP 巳 ASIG では， XX = I : RETURN のようにし，呼 
び出した GOSUB の直後に IF XX = 丨 THEN 行番号とすること （ GOSUB が何箇所あっても各々 
についてごれを行うこと）。 

MZ - 700のテープ版 S - BASIC と SHARP BASIC では， ELSE 以降のある IF 文は変更の必要があ 
る （ ELSE 以降は条件が成立しなかったときに実行される）。また，条件に AND や OR が含まれて 
いた場合はその両側の条件を （） でくくり， AND は*に， OR は+にする。また, IF ~ THEN~ELSE 
がネストしているときは， ELSE は内側の IF に対応している。例えば， 

100 IF A>B OR C = D THEN PRINT " A”ELSE IF E = F THEN PRINT “ B ” ELSE 
PRINT “ C ，， 

は， 


文字バッファの大きさ 
を指定したり BASIC の 
使用エリアを制限して 
マシン語エリアを確保 
したりする。 

変数の内容を交換する。 

文字変数の一部の文字 
列を置き換える。 


画面にデータを表不す 
る。 


ブリンタにデータを出 
力する。 


画面にデータを表示す 
る （ PRINT と少し違う）。 


キーポー ドよ りデータ 
を入力する （， で区切 
る)。 


キーボードよリデータ 
を入力する （， で区切 
らない…文字変数専用)。 


プログラム中のデータ 
を変数に読み込む。 

データを置く。 


データの読み取り位置 
を指定する。 

指定行に実行を移す 

サブルーチンを呼び出 
す。 

サブルーチンから帰る。 


条件により処理を変え 

る,- 


SHARP BAS| n 
(MZ-80K/C/1200/80B/2000/2200) 

⑩ SP- 5030 ③ MZ-IZ00I MZ-2Z00I 

① SB-5520 4 MZ-i Z002 泞 MZ- 2Z021 

② SB-6520 にのみ存在 


備 


考 


働き 


S 


般ステ—トメント 
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付録 BASIC DATA LIST 97 















|0 N 〜 GOTO ON 〜 GOSUB ON 〜 RESTORE ON 〜 RETURN FOR NEXT WHILE WEND 
'repeat UNTIL STOP END PAUSE VDIM VDIM 〇し EAR LABEL PUSH POP 


働き 

N- BASIC (PC- 8001 ほか) 

D …デイスク版にのみ存在 

NssBASIC (PC-8801 ほか） 

(^)"88 SR のサウンド関係の拡張命令 

P •••ディスク版にのみ存在 

MSX-BASIC VI. 0 ( 各社 MSX) 

〇…ディスク版にのみ存在 

複行条件判断の最初の 
条件を置く。 




複行条件判断の2番目 
〜最後の条件を置く。 




複行条件判断のいずれ 
の条件も合わなかった 
時の処理を置く。 




複行条件判断の終了を 
示す。 




式の値により実行を移 
す行を変える。 

ON 数値式 GOTO 行番号〔，行番号…〕 

ON 数値式 GOTO 行番号〔，行番号…〕 

ON 数値式 GOTO 行番号〔，行番号…〕 

式の値により呼び出す 
サブルーチンを変える。 

ON 数値式 GOSUB 行番号〔，行番号…〕 

ON 数値式 GOSUB 行番号〔，行番号…〕 

ON 数値式 GOSUB 行番号〔，行番号…〕 

式の値によりデータの 
読み取り位置を変える。 




式の値によりサブルー 
チンから戻る行を変え 
る。 




指定回数のループを開 
始する。 

FOR 数値変数名=初期値 TO 終了値 〔STEP 
增分〕 

FOR 数値変数名=初期値 TO 終了値 〔STE 

P 增分〕 

FOR 数値変数名=初期値 TO 終了値 〔STEP 
增分〕 

FOR ループの終了位置 
を示す。 

NEXT 〔数値変数名〔，数値変数名…〕〕 

NEXT 〔数値変数名〔，数値変数名…〕〕 

NEXT 〔数値変数名〔，数値変数名…〕〕 

条件成立中ループを行 
う（最初から条件不成 
立なら 一度 もループし 
ない) 。 


WHILE 条件式© 


WHILE ； レープの終了位 
置を示す。 


WEND ® 


条件成立までループを 
行う（最初から条件成 
立していても最低1度 
はループする）。 




REPEAT ループの終了 
位置を示す。 




プログラムの実行を中 
断する。 

STOP 

STOP 

STOP 

プログラムの実行を終 
了する。 

END 

END 

END 

プログラムの実行を一 
定時間停止する。 




グラフィック RAM に配 
列を置く。 




グラフィック RAM _ h の 
変数をクリアする。 




ラベルを置く。 


(単にラベル名だけで良い） 


データをユーザースタ 
ックに積む。 




データをユーザースタ 
ックから取る。 





分類 


般ステ I トメ ン- 
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F-BASIC V3.0 (FM-7 ほか） 

D: …ディスク版にのみ存在 

HuBASIC (MZ-700) 

HuBASIC (XI- XI turbo) 

1 CZ -8 CB 01 VJ.O 3 CZ -8 CB 0 I V 2.0, CZ -8 FB 01 V 2.0 

2 CZ -8 FB 01 VI . 0 4 CZ -8 FB 02 VI . 0にのみ存在 

ON 数値式 GOTO 行番号〔，行番号…〕 

ON 数値式 GOTO 行番号〔，行番号…〕 

ON 数値式 GOTO 行番号〔，行番号…〕 

ON 数値式 GOSUB 行番号〔，行番号…〕 

ON 数値式 GOSUB 行番号〔，行番号…〕 

ON 数値式 GOSUB 行番号〔，行番号…〕 


ON 数値式 RESTORE 行番号〔，行番号…〕 

ON 数値式 RESTORE 行番号〔，行番号…〕 


ON 数値式 RETURN 行番号[，行番号 J〕 

ON 数値式 RETURN 行#号〔，行番号…〕 

FOR 数値変数名=初期値 TO 終了値 〔STEP 
增分〕 

FOR 数値変数名=初期値 TO 終了値 〔STEP 
増分〕 

, FOR 数値変数名=初期値 TO 終了値 〔STEP 增分〕 

NEXT 〔数値変数名〔，数値変数名…〕〕 

NEXT 〔数値変数名〔，数値変数名…〕〕 

NEXT 〔数値変数名〔，数値変数名…〕〕 

WHILE 条件式 

WHILE 条件式 

WHILE 条件武 

WEND 

WEND 

WEND 


REPEAT 

REPEAT 


UNTIL 条件式 

UNTIL 条件式 

STOP 

STOP 

STOP 

END 

END 

END 


PAUSE 時間 

PAUSE 時間 



VDIM 配列名（添字の最大値〔，…〕）〔，配列名…〕④ 



VDIM CLEAR 〔開始アドレス，終了アドレス〕 


LABEL “ラペル名” 

LABEL “ラベル名” 



PUSH 式〔，式…〕 



POP 変数名〔，変数名…〕 
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付舍录 BASIC DATA し 1ST 99 

















LJ 


IF-THEN ELSE IF ELSE END IF ON 〜 GOTO ON 〜 GOSUB ON 〜 RESTORE 
ON-RETURN FOR NEXT WHILE WEND REPEAT UNTIL STOP END PAUSE し ABE し 


BASIC-M25 (MZ- 250 0) 

BASIC-S25(MZ-2500) 

S-BASIC(MZ-700/1500) 

① MZ -700 テープ 版(付属） 

② MZ -700 QD . Disk 版 

③ MZ -1 500 OD . Disk 版にのみ存在 



〔ELSE {給トメント}〕 

IF 条件 THEN 

IF 条件 THEN 


ELSE IF 条件 THEN 

E し SE IF 条件 THEN 


ELSE 

EI_SE 


END IF 

END IF 


ON 数値式 GOTO 行番号〔，行番号 … j 

ON 数値式 GOTO 行番号〔，行番号…〕 

ON 数値式 GOTO 行番号〔，行番号…〕 

ON 数値式 GOSUB 行番号〔，行番号…〕 • 

ON 数値式 GOSUB 行番号〔，行番号…〕 

ON 数値式 GOSUB 行番号〔，行番号…〕 

ON 数値式 RESTORE 行番号〔，行番号…〕 

ON 数値式 RESTORE 行番号〔，行番号…〕 


ON 数値式 RETURN 行番号!:，行番号…〕 

ON 数値式 RETURN 行番号〔，行番号…〕 


FOR 数値変数名=初期値 TO 終了値 〔 STEP 増分〕 

FOR 数値変数名=初期値 TO 終了値 〔S 
TEP 増分〕 

FOR 数値変数名=初期値 TO 終了値 〔STEP 
増分〕 

next 〔数値変数名〔，数値変数名…〕〕 

NEXT 〔数値変数名〔，数値変数名…〕〕 

next 〔数値変数名〔，数値変数名〕〕 

WHILE 条件式 

WHILE 条件式 


WEND 

WEND 


REPEAT 

REPEAT 


UNTIL 条件式 

UNTIL 条件式 


STOP 

STOP 

STOP 

END 

END 

END 

PAUSE 時間 

PAUSE 時間 


(単にラベル名だけで良い） 

(単にラベル名だけで良い） 

LABEL ** ラベル名”②③ 


100 Oh! MZ 1986.1. 
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SHARP BASIC 

(MZ-80K/C/1200/80B/2000/2200) 

0 SP -5 O 3 O MZ-tZOOl を MZ -2 Z 00 I 
W SB -5520 ：^ MZ-i Z 002 ：6) MZ -2 Z 021 

② SB - 6520 にのみ存在 


備 


考 


働き 


ON 数値式 GOTO 行番号〔，行番号…〕 
ON 数値式 GOSUB 行番号〔，行番号…〕 


STOP 


100 IF ( A > B)+(C = D ) THEN PRINT “ A ” ： GOTO 110 
102 IF E = F THEN PRINT “ B ” ： GOTO 110 
104 PRINT “ C ” 

110 

〜とする。 


IF 文の作用を複数の行に広げたもの。基本的な考え方は普通の | F ~ THEN 〜 ELSE と変わらないの 
で， GOTO 文を使って簡単に置き換えることができる。なお,各 THEN の後とただの ELSE (いずれ 
の条件も不成立のとき）の後は，常に改行し， ELSE が行の先頭から始まるのが特徴 。 ELSE 
IF - THEN と ELSE はないこともあるが IF ~ THEN と END IF は必ず I 対 I で対応している。 


FOR 数値変数名=初期値 TO 終了値 〔STEP 
増分〕 


NEXT 〔数値変数名〔，数値変数名…〕〕 


これがない BASIC では ON ~ GOSUB で丨 度サブルーチンに飛び， その先で RESTORE して， 
RETURN するようにする。 

これがない BASIC ではただの RETURN 行番号のときのように XX = I のようにフラグを立てて 
いったんメインルーチンに戻り，そこで 0 N — G 0 T 0 でジャンプするようにする。 


Nss , Hu , M 25 では増分が正で初期値>終了値 （FOR A = I TO 0 等）や増分が負で初期値 
く終了値の場合は I 回もループしない0他の BASIC では少なくとも I 度は美行してしまうので， 
FOR ループに入る前に IF 文で テス トし，場合によっては NEXT の次にジャンプする。逆に Hu , 
M 25 への移植では問題にならないことが多いが，場合によっては NEXT の所で判断する IF 文に 
変えると良い。 

Nss , Hu , M 25 では上記の理由により FOR 文の所でループ脱出条件を判断するので，対応する 
NEXT はひとつしか認められない。つまリ FOR と NEXT は物理的に I 対 I に対応している必要 
がある。 IF~THEN NEXT 等は不可なので， THEN 行番号 （ NEXT のある行）のようにする。 

WHILE のない BASIC では，例えば WHILE A > B なら ， IF A=<B THEN 行番号 （ WEND の次の 
文のある行）のようにする 3 


WHILE のあつた行に GOTO する。 


REPEAT のない BASIC では単に取ってしまう。 


UNTIL のない BASIC では，例えば UNTIL 
次の文のある行）のようにする。 


A=B なら ， IF AOB THEN 行番号 （REPEAT の 


マイクロソフト， Hu , M 25 では CLOSE の働きを含むので，他に移植する場合， OPEN があって 
CLOSE 力くないなら， END の直前に CLOSE を追カロ。 

時間はいずれも 0. 1秒単位の指定。 PAUSE のない BASIC では FOR 〜 NEXT で代用（ループ回数は実 
験で決める)。 

Xlturbo 以外では一般の DIM に直す。逆に， XI turbo では DIM でメモリ不足になっても VDIM でなら 
充分余るので，大量のデータを扱うブログラムの移植も容易になる。 

VDIM で宣言した配列は CLEAR や RUN では消えないので，この文を使う。アドレスで範囲を指定 
してグラフィック RAM の一部のみを使用することができる（他の BASIC に移植する場合は ，V 
DIM CLEAR は取ってしまって良い)。 


実際に使われることは極めてまれだが，もし使われていたなら，仮想スタック用一次元配列を 
作る。もしスタックに置くデータの型が数値と文字の両方なら，文字配列にして数値を文字列 
で記憶させるか，マシン語エリアを確保し，スタックを構成させる。 


複行条件判断の最初の 
条件を置く。 

複行条件判断の2番目 
〜最後の条件を置く。 

複行条件判断のいずれ 
の条件も合わなかった 
時の処理を置く。 

複行条件判断の終了を 
示す。 

式の値により実行を移 
す行を変える。 

式の値により呼び出す 
サブルーチンを変える。 

式の値により データの 
読み取り位置を変える。 

式の値によりサブルー 
チンから戻る行を変え 
る。 

指定回数のループを開 
始する。 


FOR ループの終了位置 
を示す。 


条件成立中ループを行 
う（最初から条件不成 
立なら一度もループし 
ない)。 

WHILE ； レープの終了位 
置を示す。 

条件成立までループを 
行う（最初から条件成 
立していても最低丨度 
はループす る）。 

REPEAT ループの終了 
位置を示す,、 

ブログラムの実行を中 
断する。 

プログラムの実行を終 
了する。 

プログラムの実行を一 
定時間停止する。 

グラフィック RAM に配 
列を置く。 

グラフイック RAM 上の 
変数をクリアする。 


ラベルを置く。 

データを ユーザー スタ 
ックに積む。 

データを ユーザー スタ 
ックから取る。 


分類 


般ステ— . 


►ン . 
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BASIC DATA LIST 101 
















ON ERROR GOTO RESUME ON RESUME ERROR OPEN FIELD CLOSE PRINT# 
WRITE INPUT# し INEINPUT# し INPUT# WIDTH 


I 


働き 


5 


エラー回復処理を行う 
ことと，そのルーチン 
を宣言する。 


エラー回復処理を行わ 
ないことを宣言する。 

エラー処理ルーチンか 
ら復帰する。 

式の値によってエラー 
処理から復帰する行を 
変える。 

強制的にエラーを発生 
させる。 


ファイルを窨き込みモ 
ードで開く。 


N- BASIC (PC- 8001 ほか ) 

⑬…ディスク版にのみ存在 

ON ERROR GOTO 行番号 


NasBASIC (PC-8801 ほか） 


••88 SR のサウンド関係の拡張命令 
乜…デイスク版にのみ存在 


MSX-BASIC VI. 0 ( 各社 MSX) 

D …ディスク版にのみ存在 


ON ERROR GOTO 行番号 


ON ERROR GOTO 行番号 


ON ERROR GOTO 0 


ON ERROR GOTO 0 


RESUME 




RESUME jj 行番号 \ 1 


NEXT J J 


ERROR エラー番号 


OPEN ••ファイル名” FOR OUTPUT AS 〔#〕 
ファイル番号 ( g ) 


ERROR エラー番号 


OPEN "ファイル名 " FOR OUTPUT AS 〔林〕 
ファイル番号煩） 


ON ERROR GOTO 0 


RESUME j {行番号 ^ 


ERROR エラー番号 


OPEN “ ファイル名 " FOR OUTPUT AS 〔 # 〕 
ファイル番号 


ファイルを読み出しモ OPEN “ファイル名” FOR INPUT AS [#) 

一.ドで開く。 ファイル番号@ 


OPEN “ファイル名，’ FOR INPUT AS [#] 
ファイル番号© 


OPEN "ファイル名” FOR INPUT AS 〔#〕 
ファイル番号 


ファイルを追加害き込 
みモードで開く。 

ファイルをランダムア 
クセスモードで開く。 

ランダ厶フアイルバッ 
ファに変数を割り当て 
る。 


ファイルを閉じる。 


ファイルにデータを出 
力する（「, j を特に付け 
ない )0 


ファイルにデータを出 
力する（データの区切 
りに r , J を付ける)。 

ファイルからデータを 
入力する（「，」をデー 
夕の区切りとみなす）。 


OPEN ••ファイル名 " FOR APPEND AS 〔#〕 OPEN “ファイル名” FOR APPEND AS 〔#〕 OPEN “ファイル名 " FOR APPEND AS 〔#〕 

ファイル番号<〇) ファイル番号<〇) ファイル番号⑬ 

OPEN “ファイル名" AS 〔#〕 ファイル番号⑬ OPEN "ファイル名" AS 〔#〕ファイル番号 OPEN ••ファイル名" AS 〔#〕 ファイル番县⑬ 

⑬ 

FIELD 〔#〕ファイル番号，長さ AS 文字変 FIELD 〔#〕 ファイル番号，長さ AS 文字変数 RELD 〔 #〕ファイル番号，長さ AS 文字変数 


数名〔，長さ…)© 


CL 0 SE 〔〔#〕 ファイル番号〔.…〕〕⑬ 


PRINT #ファイル番号 
TAB (位置） 

SPC (スペース置） 

式 

USING “ 書式 " 


名〔.長さ…〕⑪ 


CLOSE 〔〔井〕ファイル番号〔，…〕〕 


PRINT #ファイル番号， 
[ TAB (位置） 


{:} [式 K :} [式…]]] 


SPC (スペース置） 


式 

USING “害式" 


{：}["] 


:} M]] 


WRITE 〔#〕ファイル番号, 


[式{□式…]]]⑰ 


名し 長さ…〕⑫ 


CL 0 SE 〔〔#〕 ファイル番号〔，…〕〕 


PRINT #ファイル番号， 

( TA 日(位置） ) 

SPG (スペース] 1) 

匪“* 式，，[式{，...]] 


INPUT •林ファイル番号， 変数名し 変数名…〕 INPUT # ファイル番号，変数名!:，変数名…〕 INPUT #ファイル番号，変数名!:，変数名〕 

(⑪） 


ファイルからデータを LINE INPUT #ファイル番号.文字変数名⑬ LINE INPUT #ファイル番号，文字変数名 

入力する（「， j をデータ 
の区切りとみなさない)。 


LINE INPUT #ファイル番号，文字変数名 


I 行の長さを制限する 
(出力時)。 


WIDTH ファイル番号 I .長さ 

1**デバイス名”/ 
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F-BASIC V3.0 (FM-7 ほか） 

D …ディスク版にのみ存在 


ON ERROR GOTO 行番号 


HuBASIC (MZ-700) 


ON ERROR GOTO 行番号 


HuBASIC(X1*Xl turbo) 

1 CZ -8 CB 01 VI .0 3 CZ -8 CB 01 V 2.0, CZ 8 FB 01 V 2. 

：2 CZ -8 FB 01 VI .0 4 CZ -8 FB 02 V 1.0 にのみ存在 


ON ERROR GOTO 行番号 


ON ERROR GOTO 0 


RESUME 


際号}] 


ON ERROR GOTO 


RESUME け行番号り 
IINEXT Jj 

ON 数値式 RESUME 行番号〔,行番号…〕 


ON ERROR GOTO 〇 

RESUME 1 f 行番号 U 

ON 数値式 RESUME 行番号！:，行番号…〕 


ERROR エラー番号 


ERROR エラー番号 


ERROR エラー番号 


OPEN “0”，〔#〕ファイル番号，"ファイル名” 


OPEN “0", 〔#〕フアイル番号，“フアイル名” 


OPEN “0”，〔#〕ファイル番号,* 4 ファイル名” 


OPEN T ,〔#〕 ファイル番号，"ファイル名" OPEN T ， 〔#〕ファイル番号，‘‘ファイル名” OPEN T ,〔#〕ファイル番号，“ファイル名” 


OPEN “ A ", 〔#〕ファイル番号，"ファイル名” 
OPEN “ R "， 〔井〕ファイル番号，“ファイル名" 


FIELD 〔#〕ファイル番号，長さ AS 文字変数 
名!:，長さ…〕⑬ 


CL 0 SEC 〔井〕ファイル番号!:，…〕〕 


PRINT #フアイル番号 
TAB (位置) 

SPC (スペース置） 
式 

USING "害式’ 


OPEN “ A ”， 〔#〕ファイル番号，“ファイル名”②®® 

OPEN " R ", 〔#〕ファイル番号，“ファイル名”② ( D ® 

FIELD 〔#〕 ファイル番号,長さ AS 文字変数名〔，長さ…〕②®® 


][{：}][-] 
{:} MOW]] 


input #ファイル番号，変数名，〔変数名〕 


CLOSE 〔〔#〕ファイル番号〔，…〕〕 


PRINT #フアイル番号， 
TAB (位置） 

SPC (スペース置） 

USING，W {:} 


WRITE # イル番号卜式 jj ; 

INPUT # ファイル番号,変数名〔，変数名…〕 


CLOSE 〔〔#〕 ファイル番号〔，...〕〕 

PRINT #ファイル番号 

(TAB (位置） 1 

SPC (スペース置） 

ふ式 ， (:r [ 式 ":}[ 式 i]]i 

WRITE # "7 ァイル番号[，式[{ ； }[^'"]]] 
INPUT #ファイル番号，変数名！:，変数名…〕 


LINE INPUT 斿フアイル番号,文字変数名 / LINE INPUT \ #ファイル番号,文字変数名 / LINE INPUT \ #ファイル番号，文字変数名 


(I 

I LINPUT / ILINPUT 
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ON ERROR GOTO RESUME ON 〜 RESUME ERROR OPEN WOPEN ROPEN AOPEN XOPEN 
FIE し D C し OSE PRINT# PRINT/T WRITE# INPUT# INPUT /T し INEINPUT# 




BASIC-M25 (MZ-2500) 


ON ERROR GOTO 行番号 


BASIC-S25(MZ-2500) 


ON ERROR GOTO 行番号 


S-BASIC(MZ-700/1500) 

① MZ -700 テープ版(付属） 

② MZ -700 QD . Disk 版 

③ MZ -1 500 OD . Disk 版にのみ存在 

ON ERROR GOTO 行番号 


ON ERROR GOTO 0 


RESUME j -[ 行番号 J j 
ON 数値式 RESUME 行番号 〔. 行番号…〕 


ERROR エラー番号 


OPEN “0”，#ファイル番号，“ファイル名" 


OPEN T ，# ファイル番号，“ファイル名" 


OPEN “ A ",# ファイル番号，“ファイル名" 


OPEN “ R ” . #ファイル番号，“ファイル名"〔，レコード長〕 
FIELD #ファイル番号，長さ AS 文字変数名〔.長さ…〕 


CLOSE 〔#ファイル番号！:，…〕〕 


PRINT #フアイル番号 
(TAB (位置） 

SPC (スペース置） 

，_，式" {:} [式[ { : } [式，| 


丽…ァィル番号[式 [{:} [式…]]] 
INPUT #ファイル番号，変数名〔，変数名…〕 

LINE INPUT #ファイル番号，文字変数名 


ON ERROR GOTO 0 


RESUME 


[臨}] 

ON 数値式 RESUME 行番号！:，行番号…〕 


ERROR エラー番号 


WOPEN #ファイル番号，"ファイル名" 


ROPEN #ファイル番号，“ファイル名" 


AOPEN #フアイル番号，“ファイル名" 


XOPEN #ファイル番号，“ファイル名” 

〔，レコード長〕 

FIELD #ファイル番号，長さ AS 文字変数 
名〔，長さ…〕 


CLOSE 〔#ファイル番号し…〕〕 


PRINT #ファイル番号 
[，式 m 
, USING “窨式" 

Hrar •厭} ra :} 鬥]] 


ON ERROR GOTO 0 

RESUME 


[{ぼ?}] 


ERROR エラー番号 


WOPEN ••ファイル名”① 

WOPEN #フアイル番号，“ファイル名”②③ 


R 0 PEN 〔"ファイル名”〕① 

R 0 PEN #ファイル番号，"ファイル名”②③ 


X 0 PEN #ファイル番号，“ファイル名”②③ 


CLOSE © 

CL 0 SE 〔# ファイル番号〔，…〕〕②③ 


PRINT I /丁① 

1#ファイル番号，②③ 

[, - [{：}][-]] 
USING “書式 


W [ 式 [{:} [ 式 …]]]1 


INPUT #ファイル番号，変数名〔，変数名…〕 INPUT / T 変数名〔，変数名…〕① 


LINE INPUT #ファイル番号，文字変数名 INPUT #ファイル番号，変数名〔，変数名…〕 
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ON ERROR GOTO 〇②⑤⑥ 

エラー回復中では，そこで回復処理を中断し，コマンドレベルに戻る。 

エラー回復処理を行わ 
ないことを宣言する。 

resume (7 行番号 V| ②⑤⑥ 

ただの RESUME ではエラー発生文に， NEXT を付けるとその次の文に、行番号を付けるとその 

エラー処理ルーチンか 

11 NEXT )J 

行にジャンプさせる。 

ら復帰する。 


RESUME 行番号の変形。 ON 〜 GOTO でジャンプした先で RESUME 行番号を利用する。 

式の値によつてエラー 
処理から復帰する行を 
変える。 


エラー番号は各 BASIC によって多少異なるが，この命令はエラー回復ルーチンのデバッグや未 

強制的にエラーを発生 


定義のエラー番号を利用したユーザーエラーを起こすもの。前者はプログラム中には出てこな 
い。後者は SHARP BASIC では G0SUB にできないか試す。 

させる。 


WOPEN〔 /丁〕“ファイル名”①③④ (SP- 5030 
は/丁は付けない） 

WOPEN ( /T I"ファイル名” 

I #ファイル番号， J ②⑤⑥ 


マイクロソフト， Hu では既にそのファイルが登録されているときはそれを消して新たに作成する 
(M25, S25, S-BASIC, SHARP BASIC では既に存在するなら KIL し. DE し ETE する）。ファイノレ番 
号は N, N88, MSX, Hu では How many files? か MAX FILE で指定した番号以下で指定する。他で 
はファイル番号は1〜100程度なら自由に決めて良く，同時に開く個数のみ制限される（論理フ 
アイル番号一> 物理ファイル番号へのテーブルを 持って いる)。 


ROPENC/T) 〔"ファイル名，，〕①③④ 
(SP- 5030は/丁は付けない） 

ROPEN { /T〔“ ファイル名”〕 

I井ファイル番号，“ファイル名 


②⑤⑥ 


N, N88, MSX, Hu では同じファイルをいくつかのファイル番号で同時に開くことができる。 


これがない BASIC では，ファイルを読み出し，別のファイルに書き込み，読み出した方のみ 
CLOSE する。そうすれば，ファイルの末尾からデータを追加してゆくことが可能である。 


X0PEN #ファイル番号，“ファイル名”②⑤⑥ ランダムアクセスの手法はシャープ系とマイクロソフト系では大きく異なる。 


マイクロソフト系 BASIC ではデータは 256(M25 はもっと小さくできる）文字分の バッファを 介 
して ファイルと データの交換を行う。つまり GET により バッファに 入った1レコード分のデータ 
は，この HELD で割り当てた文字変数に自動的に代入される。その変数は一般の文字変数と全く 
同じように參照して良い。逆に FIELD で割り当てた変数にデータを代入する （LSET.RSET を使 
う）と，自動的に バッファに そのデータが セッ トされる。そして PUT を行う とファイルに データが 
書き込まれる。 FIELD #1,200 ASA$, 40ASB$, 1 6ASC$ なら1レコードは200, 40,16文字の3 
分割して使われる。 


CLOSE〔/T〕 
CLOSE f f/T 


①③④ 

②⑤⑥ 


PRINT 


[l # ファイル番号〔， …〕 }] 

アイ）レ番号， CD©©} 

1 usingw {:} ri {: r--]]]| 


INPUT f /T \ 

1 井ファイル番号，②⑤⑥ j 
変数名〔，変数名…〕 


マイクロソフト， H u，M25 では画面への出力と全く同じイメージで書き込まれるが, S-BASIC 
の QD， ディスク版 .S25 では「，」が使われるとそこに改行コード （0DH) が書き込まれる。 
S-BASIC のテープ版と SHARP BASIC では「；」も「，」も改行コードになる。改行コードになるもの 
をそうならないものに移植する時は，念のため2つ以上の PRINT 文にしたほうが良い (PRINT 
#1,A$，B$—PRINT #1,A$: PRINT # 1,B$ のように)。逆に Hu 等の文字の「 ；J は文字列を結 
合して出力する （PRINT #1, A$; B$->PRINT #1,A$ + B$ 等)。 

INPUT # 文と組み合わせると，相性も良く，容量の効率も優れている。ただ，これがない BAS- 
IC では PRINT #文にして良い（「； j は「，」にすること）。 WRITE 文の所も參照すること（同じイ 
メージである)。 

マイクロソフト， Hu では，数値の代入時，「，」に加えスペースもデータの区切りとみなすので， 
PRINT 時 「 ；J で区切られた数値データを，分けて入力することができる。他ではそれができな 
いので， QD •ディスク版の S-BASIC と S25 では PRINT 文の「；」があれば，「，」にする-。 "M25 では， 
ひとつの PRINT 文ではひとつデータしか出力しないようにする（「；」や「，」で分けて2つ以上の 
PRINT にする)。 N では#一1としてカセットをアクセス可 （PRINT #でも同様 X0PEN は不用な 
ので移植時に OPEN を追加すること。 

PRINT #文と組み合わせると，文字データの受け渡しに向いている （CHR$(32) 未満がない限 
り，そのままそっくり保存しておける)。 


長さを超える前に自動的に改行コードが入る。 


ファイルを書き込みモ 
ードで開く。 


ファイルを読み出しモ 
—ドで開く。 


ファイルを追加書き込 
みモードで開く。 

ファイルをランダムア 
クセ スモー ドで開く。 

ランダムファイルバツ 
ファに変数を割り当て 
る。 


ファイルを閉じる。 


ファイルにデータを出 
力する （「,j を特に付け 
ない)。 


ファイルにデータを出 
力する（データの区切 
りに「， j を付ける）。 

ファイルからデータを 
入力する（「， j をデー 
夕の区切りとみなす):。 


ファ イルからデータを 
入力する （「，j をデータ 
の区切りとみなさない） 

I行の長さを制限する 
(出力時)。 


ル 

ス 


SHARP BASIC 
(MZ-80K/C/1200/80B/2000/2200) 

⑧ SP- 5030 3 MZ-IZOOI 'S' M2-2Z00! 

( J ) SB-5520 4 MZ- I Z002 (6；» M2-2Z02i 

② SB-6520 にのみ存在 


ON ERROR GOTO 行番号②⑤⑥ 


備 


考 


テープ版の SHARP BASIC では根本的な代用法はないが， INPUT 等では極力適正な値を入力する 
ように気を付けたり，エラーになる前にデータ等をチェックするようにして，問題があればエ 
ラー回復ルーチンを G0SUB で呼び出す。また，どうしてもというなら， MZ-2Z001 (⑤）と同 
内容の BASIC が MZ- 2000 .2200 用に出ているので，これを使っても良い。型番は MZ-1Z010。 


働き 


エラー回復処理を行う 
ことと，そのルーチン 
を宣言する。 


S 


般ステ—トメント 
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ファイル名を付け換え 
る。 

ファイルを害き込み禁 
止にする。 


ファイルの書き込み時 
ベリファイするように 
する。 

ファイルを通常の状態 
に戻す。 


NAME •旧ファイル名” AS “新ファイル名”⑬ NAME “旧ファイル名” AS "新ファイル名"® 


SET 


ドライブ番号 >“P" ⑬ 
“ファイル名” 

#ファイル番号 j 


SET 


ドライブ番号 }“R" ® 
"ファイル名" 

#ファイル番号 j 


SET f ドライブ番号 
I "ファイル名” 

I#ファイル番号 





© 


NAME "旧ファイル名” AS "新ファイル名’’ 


SET 


ドライブ番号 ) 
“ファイル名" 

#ファイル番号 j 


“P” ⑬ 


SET 


ドライブ番号 
“ファイル名" 

#ファイル番号 


"R" ⑬ 


SET 


ドライブ番号 ) 
“ファイル名” 

社ファイル番号 j 




編階層ディレクトリを選 
11 択する。 


階層ディレクトリを作 
成する。 

階層ディレクトリを消 
去する。 


念 ファイルをコピーする。 

s ハードディスクのへツ 
し ドを解放する。 

: ファイルを閉じずにフ 
i アイルバッファを解放 

i ' する。 


ドライブの種類を選択 


COPY “転送元ファイル名" TO “転送先ファイル 
名”® 


デバイスを選択する。 


ファイルを不可視状態 
にする（デイレクトリ 
を取っても見えないよ 
うにする）。 


LSET 文字変数名=文字式⑬ 

RSET 文字変数名=“文字式"⑬ 

PUT〔#〕 ファイル番号〔，レコード番号〕® 

GET〔#〕 ファイル番号〔，レコ_ド番号〕® 

MAXFILES= ファイル数 

DSKI $ (ドライブ番号，シリンダ番号,面番号， 
セクタ番号）®⑬ 

DSKOS ドライブ番号,シリング番号,面番号， 
セ.クタ番号⑬ 

CALL FORMAT © 

KILL "ファイル名”⑬ 


MSX-BASIC VI. 0 ( 各社 MSX) 

D …ディスク版にのみ存在 


I 


働き 


ランダムファイルバツ 
ファに左づめでデータ 
を置く。 


N-BASIC (PC- 8001 ほ 力、） 

⑬…ディスク版にのみ存在 

LSET 文字変数名=文字式⑬ 


曝 BASIC (PC-8801 ほか ) 

(^••88SR のサウンド関係の拡張命令 
ディスク版にのみ存在 


LSET 文字変数名=“文字式"® 


ランダムファイルバッ 
ファに右づめで データ 
を置く。 

ランダムファイルに1 
レコー ド出力する。 


RSET 文字変数名=文字式® 


RSET 文字変数名=“文字式”® 


PUT 〔井〕ファイル番号〔，レコード番号〕⑬ PUT 〔#〕ファイル番号〔，レコード番号〕⑬ 


ランダムファイルから GET 〔井〕ファイル番号〔，レコード番号〕® GET 〔#〕ファイル番号〔，レコード番号〕® 

1レコード入力する。 


同時に開けるファイル （起動時に How many files ?で答える）⑬ 
の数を指定する。 


(起動時に How many files? で答える）⑬ 


ダイレクトにディスク DSKI$ (ドライブ番号，シリング番号，面番号 ， DSKIS (ドライブ番号，シリンダ番号，面番号， 
から入力する。 セクタ番号）煙）® セクタ番号）通）® 

ダイレクトにディスク dSKO$ ドライブ番号，シリンダ番号,面番号， DSKO$ ドライブ番号，シリンダ番号,面番号， 

を出力する。 セクタ番号⑬ セクタ番号® 

デバイスを初期化する t FORMAT ドライブ番号® 


ファイルを消去する。 


KILL “ファイル名”⑬ 


KILL "ファイル名”® 



LSET RSET PUT GET MAXFI し ES DSKI$ DEVI$ DSKOS DEVO$ FORMAT DSKINI 
INIT KILL NAME SET DEVICE CHDIR MKDIR RMDIR COPY HDOFF 


ファイルステートメント 
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F-BASiC V3.0 (FM-7 ほか） 

D、 …ディスク版にのみ存在 

HuBASIC (MZ-700) 

HuBASIC(XI-X1 turbo) 

1；：CZ-8CE01 VI. 0 .3 CZ-8CB01 V2.0, CZ-8FB01 V2.0 

(2；：CZ-8FB01 VI.0 4 CZ-8FB02 V1.0 にのみ存在 

LSET 文字変数名=“文字式”(〇) 


LSET 文字変数名=“文字 式"②③④ 

RSET 文字変数名=“文字式"© 


RSET 文字変数名=“文字式"②③④ 

PUT 〔#〕ファイル番号〔，レコード番号〕⑬ 


PUT 〔#〕ファイル番号〔，レコード番号〕②③④ 

GET 〔#〕ファイル番号〔，レコード番号〕© 


GET 〔#〕ファイル番号〔，レコード番号〕②③④ 

(起動時に How many files ?で答える）⑬ 

MAXFILES フアイル数 

MAXFILES ファイル数 

DSKI$( ドライブ番号，トラック番号，セクタ 
番号）⑩⑬ 


DEVI $ “デバイス名”，レコード番号，文字変数名，文字変数名 

DSKO $ドライブ番号，トラック番号，セクタ 
番号® 


DEVOS "デバイス名 r レコード番号，“文字データ”，“女字データ” 

DSKINI ドライブ番号® 


INIT "デバイス名” 

KILL “ファイル名"⑬ 


KILL “ファイル名” 

NAME ••旧ファイル名” AS "新ファイル名” 


NAME “旧ファイル名” AS "新ファイル名”②③④ 



set r ファイル名，，い “P" ②③④ 

1林ファイル番号 J 



SETf “ファイル名"レ " R" ②③④ 

1#ファイル番号/ 



SET ファイル名” “"②③④ 

1#ファイル番号} 



SET "ファ f ル名”，“ S” ④ 


DEVICE “デバイス名” 

DEVICE "デバイス名" 



CHDIR “ディレクトリ名"® 



MKDIR "ディレクトリ名"④ 



RMDIR “ディレクトリ名”® 



COPY •‘転送元ファイル名” TO ••転送先ファイル名"④ 



HDOFF ドラィブ番号④ 
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m 


し SET RSET PUT# PRINT# GET# INPUT# DEVI$ DEVO$ INIT KILL DELETE NAME RENAME SET LOCK 
UNLOCK VERIFY CHDIR DEFAULT MKDIR RMDIR 




S-BASIC(MZ-700/1500) 

BASIC-M25 (MZ- 250 0) 

BASIC - S25(MZ- 250 0) 

I MZ-700 テープ版(付属） 
r 2 j MZ-700 OD.Disk 版 
③ MZ-1 5000 D.Disk 版にのみ存在 

LSET 文字変数名 =“ 文字式” 

LSET 文字変数名=“文字式” 


RSET 文字変数名=“文字式” 

RSET 文字変数名 =* •文字式" 


PUT #ファイル番号〔，レコード番号〕 

(PUT #ファイル番号〔，レコード番号〕 

1 PRINT #ファイル番号（レコード番号），式 

PRINT #ファイル番号 （ レコード番号），式 
〔，式…〕 ②③ 


〔，式 …〕} 


GET #ファイル番号〔，レコード番号〕 

(GET #ファイル番号〔，レコード番号〕 

\ INPUT #ファイル番号 （ レコード番号），変 

INPUT #ファイル番号（レコード番号）,式〔， 
式…〕 ②③ 


数名〔，変数名…: J 


(常に17個まで開けるので不要） 

(常に17個まで開けるので不要） 

(必要に応じて動的に割り当てられるので不 
要） ②③ 

DEVI$ “デバイス名”，レコード番号，文字変数名，文字変数名 

DEVI$ "デバイス名:’レコード番号，文字変 
数名，文字変数名 


DEVO$ “デバイス名:’レコード番号，“文字データ”，“文字データ" 

DEVOS ••デバイス名:’レコード番号，“文字デ 
一夕"，“文字データ” 


INIT "デバイス名” 

INIT “デバイス名” 

INIT “デバイス名” _ 

KILL •‘ファイル名” 

DELETE “ファイル名” 

DELETE •‘ファイル名” dXD 

NAME "旧ファイル名” AS “新ファイル名” 

RENAME “旧ファイル名"，"新ファイル名” 

RENAME "旧ファイル名”，“新ファイル名” 

SET “ファイル名”，“ P” 

LOCK “ファイル名” 

LOCK "ファイル名” _ 

VERIFY / ON \ 

VERIFY / ON \ 


IOFFJ 

lOFFj 


SET "ファイル名”，"" 

UNLOCK "ファイル名” 

UNLOCK “ファイル名” dXD 

CHDIR "デバイス名” 

CHDIR "デバイス名” 

DEFAULT "デバイス名” _ 

CHDIR “ディレクトリ名" 

CHDIR “ディレクトリ名” 


MKDIR ••ディレクトリ名” 

MKDIR “ディレクトリ名" 


RMDIR “ディレクトリ名” 

RMDIR “ディレクトリ名” 



KILL 〔#ファイル番号〔，…〕〕 

KILL 〔林ファイル番号〔，“•〕〕 

INIT"〔FD〕 番号： f ドライブタイプ 

1シリンダ数，ステップレート，タイミング/ 

INIT “〔FD〕 番号： 

\ドライブタイプ X 

1シリンダ数，ステップレート，タイミング/ 
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SHARP BASIC 

(MZ-80K/C/1200/80B/ 2000 /2200) 

⑧ SP -5030 ③ MZ-i ZOO I ⑤ MZ-2Z001 

Ij ' SB - 5520 4 MZ-I 1002 ⑥ MZ- 2Z021 

SB - 6520 にのみ存在 


DELETE ■■ファイル名”②⑤⑥ 

RENAME ••旧 ファイル名”，“新ファイル名" 

②⑤⑥ 

LOCK ■•ファイル名”②⑤⑥ 


備 


考 


PRINT ^ファイル番号（レコード番号)，式 
〔，式〕②⑤⑥ 


INPUT #ファイル番号（レコード番号），式 
〔，式〕②⑤⑥ 


(必要に応じて動的に割り当てられるので不 
要）②⑤⑥ 


文字式の長さが FIELD で指定した長さより大きいときは，左のほうから順に採用され，右のほ 
うのデータは切り捨てられる。文字列の長さが不足のときは左づめで代入され，余った所（右 
のほう）にはスペースが入る。 


文字式の長さが FIELD で指定した長さより大きいときは，左のほうから順に採用され,右のほう 
のデータは切り捨てられる。文字列の長さが不足のときは右づめで代入され,余った所（左のほ 
う）にはスペースが入る。一般には LSET がよく使われ， RSET はあまり使われない。 


シャープ系の BASIC では I レコードは32文字分 （S 25ではもっと增やせる）の固定で，丨レコ 
ードに I つの データを置くようにしている。 ファイルバッファの 概念がないため，取っ付きや 
すいものの，文字列が33文字以上の時に面倒なのと，数値データの効率が良くない（マイクロ 
ソフト系では MKS $, CVS 等の関数を使えば内部表現のまま数値を置ける)。このためシャープ 
系—^マイク ロソフ ト系では，プログラムと共に，データの構造をも大幅に変更する必要がある。 


マイクロソフトでは，データの受け渡しにはファイルバッファの# 0 (LOAD .SAVE 等用でデ 
一タファイル用には使われない）が使われ， FIELD #0~ でランダムファイル同様の方法で 
割り当てられた変数を介して入出力する。なおマイクロソフトではディスク専用だが Hu 等では 
他のデバイスが使える。 

N, MSX は物理フォーマット。 F, Hu は論理フォーマット。その他も含め，これらの間の互換 
性は特にない。 


働き 


N,N 88 はドライブ全体に対しても行える。主に信頼性向上のためのものなので，当てはまる機 
• 能のない BASIC では，取ってしまって良い。 


ランダムファイル バッ 
ファに左づめでデータ 
を置く。 

|ランダムファイルバッ 
ファに右づめでデータ 
を置く。 

ランダムファイルに1 
レコード出力する。 


ランダムファイルから 
1レコード入力する。 


同時に開けるファイル 
の数を指定する。 

ダイレクトにディスク 
から入力する。 

ダイレクトにディスク 
を出力する。 

デバイスを初期化する。 


ファイルを消去する， 

ファイル名を付け換え 
る。 

ファイルを書き込み禁 
止にする。 


UNLOCK •■ファイル名”②⑤⑥ 


ないものでは取ってしまつて良い。 


ファイルの書き込み時 
ベリファイするように 
する。 

ファイルを通常の状態 
に戻す。 


ファイルを不可視状態 
にする（デイレクトリ 
を取っても見えないよ 
うにする ） u 


各 ステー トメ ントでデバイス 名を省略したときの デバイスを 選択す るもの。 例えば Hu で DEV 
ICE **1 :"とすると，次に OPEN T ，#1 ,“TESr としたときには OPENT, # 1,“1 : TEST " 
を 意味す るようになる。 


デバイスを選択する。 


KILL 〔# ファイル番号し...〕〕 


XI turbo. MZ- 2500 以外の機種では，とりあえず取ってしまう（あまり使われることはないが)。 


ブログラムなら 一度ロードしてセーブす るようにする。 データなら 簡単な ユーティリティを作って 代用 
する。 

XUurbo 以外はハードディスクが使えないので関係ない。 


一度 CLOSE した後，そのファイルが害き込みモードだったときは， KILL 文でファイルを削除 
する（この文は，何らかの理由でファイルとして正式に登録する必要のない場合のキャンセル用 
に使われる）。 

旧タイプ，新タイプのディスクドライブに対応するための命令（他のパソコンでは取って良い)。 


階層ディレクトリを選 
択する。 

階層ディレクトリを作 
成する。 

階層デイレクトリを消 
去する。 

ファイルをコビーする,, 


ハ ード デイ スク のへツ 
ドを解放する。 

ファイルを閉じずにフ 
ァイル バッファを 解放 
する.， 

ドライブの種類を選択 
する、. ■ 
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INIT OPEN PRINT% INPUT% WIDTH CONSOLE 


働き 


RAM ディスクを初期 
化する。 


RS -232 C のパラメ- 
を設定す る。 


N-BASIC (PC- 8001 ほか ) 

ぬ)…ディスク版にのみ存在 


NssBASIC (PC-8801 ほか） 

C ^)"88 SR のサウンド関係の拡張命令 
(り;…ディスク版にのみ存在 


MSX-BASIC VI. 0 ( 各社 MSX) 

D …ディスク版にのみ存在 


RS -232 C に データを送 
信する。 

RS -232 C から データを 
受信する。 


INIT %番号，モード，コマンド 

※モード： i 825 l のコマンドポートに書き込む値 


PRINT %番号,式〔…〕 
INPUT %番号，変数〔. • 


OPEN “ COM 番号：〔パリティビット〔ストップ 
ビット〔制御方法〔カナ表現〕〕〕〕” AS 〔#〕 ファ 
イル番号 

※パリティ： E (偶数） N (なし）0(奇数）のど 
れか丨文字。 

ビット： 7または8の数字 （8 の時はパリテ 
ィに E か0は指定できない）。 

ストップビット：1 (1 ビット） 2(1.5 ビット） 
3(2 ビット）のどれか1文字。 
制御方法： X ( X 0 N / X 0 FF 制御する） N (しな 
い）のどちらか。 

カナ表現： S (ビットが7のときに有効で ， SI 
/ SO によりカナを送受信する ） N 
(しない）のどちらか。 


(PRINT #等を使用） 
(INPUT #等を使用） 


文字画面のモードを設 
定する(主に表示桁数)。 


WIDTH 〔桁数〕〔.行数〕 

※桁数は36, 40, 72, 80のいずれか。行数は20ま 
たは25。擬似グラフィックのドット数はこ 
の横2倍,縦4倍に連動して変わる 。 WIDTH 
80, 25なら 160 X 100 ドットになる。 


WIDTH 桁数〔，行数〕 

※桁数は40または80。行数は20または25。グラ 
フィック画面は変わらな L 、(非連動）。 


( SCREEN で設定）。 


文字画面のモードを設 CONSOLE 〔開始行〕〔，〔行数〕〔，〔フアンクシ CONSOLE 〔開始行〕〔〔行数〕!:，〔ファンクシヨ 


定する（主にスクロ- 
ル範囲）。 


ヨ ン キー 表示〕〔，カラ ーモー ド〕〕〕 

※カラーモードが0ならモノクロモードにな 
り， COLOR 文の指定はプリンク等になる。 

1ならカラーモードになり， COLOR 文のネ旨 
定は色指定になる。フアンクシヨンキー表 
示は0なら表示しない，1なら画面の最下 
行に表示する（実際に文字が表示できる部 
分は減る）。 


ンキー表示〕〔，カラ- 
« N と同じ。 


•モード〕〕〕 


WIDTH 桁数 

糸32桁モードで WIDTH 20を実行すると， 7 
桁〜26桁目が範囲になる。つまり，左右の 
端から表示範囲がせばめられてゆく。 


分類 


ファイル操作ステ—トメン. 


画面モ—ド•文字画面制御 
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F-BASIC V3.0 (FM-7 ほか） 

D 、 …デイスク版にのみ存在 


open "{ ふ p 〔社〕ファイル番号, “ COM 番号： 

〔（クロックビットパリティストップビッ 
卜）〕” 

※クロック： S (占）または F (古）のどちらか。 

2種類のボーレイトがビット： 7または8 
の数字。 

パリティ： E (偶数） N (なし）0(奇数）のど 
れか丨文字 

ストップビット： 1(1 ビット） 2(1. 5ビット） 
3 (2 ビット）のどれか丨文字 


(PRINT #等を使用） 


(INPUT #等を使用） 


WIDTH 〔析数〕〔•行数〕 

※桁数は40または80。行数は20または25。グ 
ラフィック非連動。 


CONSOLE 〔開始行〕〔，〔行数〕〔，フアンクシヨン 
キー表示〕〕〕〔，〔カラーモード〕〕〕 

※フアンクシヨンキー表示は N と同じ。 

カラーモードは0でカラー，丨でモノクロ。 
モノクロ時は緑で表示されるが速度が速く 
なる。これは， FM -7 がグラフィック RAM 
に文字を表示していることを少しでもカバ 
一しようというもの。 


HuBASIC(Xl - XI turbo) 

HuBASIC (MZ-700) U ： CZ - 8CB0I VI.O 3 ! CZ - 8CB01 V 2.0, CZ - 8FB01 V 2.0 

2 CZ -8 FB 01 VI.O ■4-. CZ -8 FB 02 VI . O にのみ存在 


INIT “ MEM 〔番号〕:" 


OPEN " G ", 〔 # 〕フアイル番号， " COM 番号••ボーレイトコードパリティ 
ビットストップビット〔制御方法〔カナ表現〔送信改行指定〔受信改行 
指定〔日本語表現〔エンドコード〕〕〕〕〕〕”④ 

※ポーレイトコード： 〇〜6 (0=150, 1=300,2=600,3=1200,4=2400， 
5=4800, 6 = 9600) の数字 

バリティ： E (偶数） N (なし）0(奇数）のいずれか 
ビット： 5,6, 7, 8,のいずれか 

ストッブビット： 1(1 ビット） 2(1. 5ビット） 3(2 ビット）のいずれか 
制御方法： X ( XON / XOFF 制御する） R ( RTS で XON / XOFF する） N または省 
略（しない）のいずれか 

カナ表現： S ( SI / SO 制御する） N または省略（しない）のいずれか 
改行指定： C ( GR のみ） L または省略 (CR + LF ) のいずれか 
日本語表現： J ( PC -980 I コンパチの旧 h +4 Bh / 旧 h +48 h で制御） N または 
省略（シフト JIS ) のいずれか 

エンドコード：キヤラクタコード 00 h ~ IFh のいずれかに 40 h か 60 h を加 
えた文字。 D または d なら 04 h が終了コードになる 


(PRINT #等を使用） 
(INPUT #等を使用） 


WIDTH 桁数①②③ 

WIDTH 〔析数〕〔，行数〕〔，グラフィック縦解像度〕〔，ディスプレイモード〕〕〕④ 
※桁数は40か80。行数は10, 12, 20, 25のいずれか。グラフィック縦解像度は0 
なら192または200ドット， I なら384または400ドットになる（ X 方向は桁数 X 
8ドット）。ディスプレイモードは〇または省略で前面パネルのスイッチの状 
態に従う， I で15 .75 kHz タイプディスブレイ，2で24 .5 kHz タイプ（高解像度） 
ディスプレイ。ただしグラフィック維400 (384) ドットは高解像度のみ可。ま 
た行数10行は低解像ディスブレイのみ可。行数が20, 10行時はグラフィック 
は使用できないがケイ線が使える。12行時はグラフィック Y 軸方向は192 
か384,25行なら200か400ドット。なお， X 丨では行数は25に固定。 


CONSOLE 開始行,行数〔，開始格，桁数〕 CONSOLE 開始行，行数〔，開始桁,桁数〕 
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RSMODE RSO RSI WIDTH CONSOLE 



BASIC-M25 (MZ-2500) 


BASIC-S25(MZ- 250 0) 


INIT “ MEM : 〔大きさ〕〔，スプーラの大きさ〕” 


INIT “ COM 番号：〔ボーレイト〔，パリティ〔ビット〔ストップビット〔制御方法〔 
カナ表現〔削除受信〔送信改行指定〔受信改行指定〔日本語表現 〔エン ド コード〕 
〕〕〕〕〕〕〕〕〕〕” 

※ポーレイト： 75,150,300, 600, 1200, 2400,4800, 9600, 19200のいずれか 

( turbo は〇〜6だが MZ - 2500ではボーレイトそのものを指定。省 
略時960 0) 

パリティ： E (偶数) N または省略（なし）0(奇数）のいずれか 
ビット： 7または8„省略すると8 

ストップビット： 1(1 ビット） 2(1.5 ビット）3または省略 (2 ビット）のいずれ 
か 

制御方法： X ( XON / XOFF 制御する） R ( RTS で XON / XOFF する） N または省略 
(しない）のいずれか 

削除受信： DEL コード （7 Fh ) 受信時の処理 

N ( NU ししつまり 00 h に変換）巳 （ BS つまり08卜|に変換） 

D または省略(変換しない）のいずれか 
改行指定： C ( CR のみ） L または省略 (CR + LF ) のいずれか 
日本語表現： J ( PC ~980 I コンパチの旧 ii + 4 Bh / 旧 h +48 h ) 

M ( MZ -5500/6500 コンパチの旧 H + 09 h / IBh + 0 1 h ) 

P (旧 JIS コンパチの旧 H + 24h+40h/IBh+28h+48h) 

N または省略（シフト JIS ) のいずれか 
エンド コード：キヤ ラク タコー ド 00 h 〜 IFh のいずれかに40»か 60 h を加 
えた文字。 D または d なら 04 h ファイルの終了コードにな 
る 


INITMEM :〔大きさ〕〔，スプーラの大きさ〕” 


INITCOM 番号:〔ボーレイト〔，パリティ〔ビッ 
卜〔ストップビット〔制御方式〔カナ表現〔削除 
受信〔送信改行指定〔受信改行指定〔日本語表示 

〔エンドコード〕〕〕〕〕〕〕〕〕〕〕" 

糸!^125と同内容。 


S-BASIC(MZ-700/1500) 

① MZ -700 テープ版(付属） 
( DMZ -700 OD . Disk 版 
③ MZ : 1500 DD . Dfsk 版にのみ存在 


INIT "RAM :〔大きさ〕〔，スブーラの大きさ〕” 

③ 


INIT “ RS 番号：モニタリングコード，初期設 
定コード”③ 

※モニタリングコード： 0~255の値で， I の 
ビットの信号をモニ 
夕する。 

ビット7…全キャラ 
クタ送出 

ビット6…送信 RTS 
ビット5〜 3" •使用し 
ない（常に0を指定） 
ビット2 •••送信 CTS 
ビット丨…送信 DCD 
ビット〇…受信 DCD 
初期設定コード： 0~255の値でビット毎に 
意味を持つ. 

ビット7…0 = 7ビット， 
I = 8ビット（データ裏:） 
ビット6 — 4…使用しな 
い（常に0を指定） 


ビット 3-2 *00 
01 = 


11 = 


ビット 


未使用 
ストップ 
ビットは 
I ビット 
ストップ 
ビットは 
1.5 ビット 
ストッブ 
ビットは 
2ビット 
•〇-_，〇〇=パリテイ 
なし 

01=奇数パリ 
テイ 

1〇=パリティ 
なし 

11=偶数パリ 
テイ 


(PRINT #等を使用） 
(INPUT #等を使用） 


WIDTH 〔桁数〕〔，行数〕 

※桁数は40か80。行数は12,20,25のいずれか。グラフィック非連動。 


(PRINT #を使用） 
(INPUT #等を使用） 


WIDTH 〔桁数〕〔，行数〕 
« M 25 と同内容。 


(PRINT #を使用） 
(INPUT #等を使用） 

(常に40桁 X 25 行） 


CONSOLE 開始行，行数！:，開始桁,桁数〕 


CONSOLE 開始行，行数〔，開始行，桁数〕 


CONSOLE 開始行,行数！:，開始桁,桁数〕 
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SHARP BASIC 

( MZ -80 K C /1200 80 B 2000/2200) 


働き 

>0) SP- 5030 3' MZ - IZ 00 I 5’ MZ -2 Z 00 I 
!]) SB- 5520 4' MZ - IZ 002 .6: MZ -2 Z 02 I 
② SB- 6520 にのみ存在 

備 考 



RAM ディスクとは余ったメモリをディスクのように使えるもの。 XI / turbo は OPTION SCRE 

RAM ディスクを初期 


EN 2のときに 48 K 分使える （ turbo では2倍まで可）。 MZ - 1500, 2500は K バイト単位の大きさで 
可変長。ただし MZ - I 500 はプリンタスプーラ（バッファ）と合わせて 64 K まで， MZ - 2500は RAM 
ディスクは I 28 K , プリンタスプーラは 64 K まで可。 MZ - I 500 では RAM カード（オプション）要。 

化する。 

RSMODE | AW , R 受信ビット〔， T 送信ビ 
l B /ット〔， M モード〕〕〕， RX 許可 

INIT 等により決めるものと， OPEN 時に決めるものとがある。 OPEN によるものは， RS -232 C 

RS -232 C のパラメータ 

アクセス時の文法を示した。 

を設定する。 

②⑽ 

※ビット： 5, 6, 7,8のいずれか(初期値 8) 



モード： 69~7卜•.ストッブビットは1ビッ 



73—75…ストップビットは1 .5 ビ 



77~79…ストッブビットは2ビッ 



69,73, 77…奇数パリティ 

70, 74, 78…パリティなし 

71，75, 79…偶数パリティ 

69~79の中で両条件に合致するも 
のを指定する（初期値 79) 



許可：〇…受信許可 



1…受信禁止 



RSO | A ) データ 

ファイルディスクリプタの考え方がないもののための文。 N 88 , F , Hu , M 25, S 25 ではディスク • 

RS -232 C にデータを送 

カセット等と共通の PRINT # (あれば WRITE # も）が使える，， 

信する。 

RSI | A j 文字変数名 

ファイルディスクリプタの考え方がないもののための文。 N 88 , F , Hu , M 25, S 25 ではディスク. 

RS -232 C からデータを 

カセット等と共通の INPUT # (あれば UNE 旧 PUT # も）が使える。 

受信する。 

CONSOLE G 桁数①〜⑥ 

画面モードを設定する文は各パソコン毎に違い，また，きちんと対応する文が存在しない。つ 

文字画面のモードを設 

※桁数は40か80。行数は常に25。 

まり，各文毎に移植することはできず，いくつかの文をまとめて別のいくつかの文に移植する 

定する（主に表示桁数)。 

グラフィックとは非連動。 

ということになる。移植の際の重要なキーポイントとなるわけだが，大切なことは，原プログ 
ラムで何をしようとしているかをきちんと理解することと，移植したいパソコンにそれができ 
るかどうか，そしてできないならどう対応するかをきちんと考えてから移植することである。 
WIDTH なら，80桁のプログラムを40桁専用のパソコンに移植するのは難しい。しかし不可能で 
はない。画面のレイアウトを考え，不要なスペースを省くとか，思い切って左半分または右半 
分のみの表示にするとか，あるいは左半分と右半分とをキーを押すことで切り替えて表示する 
とか，原プログラム通りのことができなくとも原プログラムの目的としていることなら実現で 
きるものである（パソコンのワープロは漢字1000文字表示も可能だが，たった8文字で頑張っ 
ているハンディワープロだってあるではないか！）。 


CONSOLE S 開始行，終了行①〜⑥ 

N , N 88 ， F , SHARP は縦方向だけだが，横方向もできるものもある。また SHARP では行数でなく 

文字画面のモードを設 


終了行になっている点にも注意。 N , N 88 の CONSOLE 10, 5, 0,1なら ， CONSOLE 10, 5 (SHARP 

定する（主にスクロー 


以外）や CONSOLE SI 0, I 4( SHARP ) にする。ただし CONSOLE の第4パラメータが0だったか 

1だったかは重要なので，きちんと憶えておくようにする。また， N 等はウィンドウの外に LOCA 

TE で力ーソルを移動できるが Hu 等ではできない。このときは CONSOLE を一時的に解除する 
ようにする。また， Hu 等の横範囲は， SHARP では取りあえず削除か REM にしておく。 

ル範囲）。 


分類 


ファイル 操作 ステ—トメント 


画面モ—ド•文字画面制御 
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ビジネスソフトへの対応 


Multiplan の基礎知識 

Masuda Toru 

増田亨 


Multiplan はコンピュータで情報を処理するとはこういうことなのかと実感させてくれる本格派だ。そ 
のためにも豊富な機能をいかに使いこなすかが重要なポイントとなってくる。これから3回にわたって 
Multiplan の内容紹介とともに，いかに使いこなすかを皆さんといっしよに考えてみたいと思う。 


パソコンを実務に活用したいと願う人は 
多いが，実際に活用されているケースは少 
ない。原因は「良いソフト」がないことに 
尽きるだろう。しかし，これから紹介する 
Multiplan は，まさにその「良いソフト」で 
ある。 

Multiplan を使えば，表を作って電卓で必 
死に計算するという仕事が パソコンで 楽々 
とできるようになる。集計用紙に定規で線 
を引いたり，縦横の集計を何回も電卓で計 
算し直すという作業から開放されるのだ。 

Multiplan の機能は作表機能と自動計算機 
能にわけることができる。 

作表機能は，集計用紙に定規で線を引く 
という作表作業がパソコンでできる機能で 
ある。 Multiplan を使うメリットは，線の引 
き直しや項目の追加•削除という変更が手 
軽にできるようになることである。また小 
数点以下の桁数とか，数字の前の¥マーク 
の有無という表示形式の変更も命令ひとっ 
で簡単にできる。 

自動計算機能は，計算手順を パソコンに 
覚えさせて自動計算させる機能である。パ 
ソコンに 覚えさせる といっても BASIC でフ。 
ログラムを組むよりはるかに簡単にできる。 
画面に表示された表を見ながら視覚的に計 
算手順を入力していくことができるからで 
ある。 Multiplan を使うメリットは，糸従横集 
計というような定型的な計算手順が数回の 
命令で簡単に指定できることだ。また，計 
算手順を パソコンに 覚えさせれば， データ 
が変わった場合の再計算が瞬時にできるよ 
うになる。 
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Multiplan があれば，集計用紙と電卓を使 
うタイプの仕事は，すべてパソコンで効率 
良くできるようになる。 

ただ， Multiplan は機能が豊富で奥が深い 
ので，最初に使い方を間違って覚えると， 
その凄さを十分に利用できない可能性があ 
る。 

そこで， Multiplan の基礎（第1回），機能 
の詳細と具体例（第2回），高級テクニック 
と応用例（第3回）という3段階にわけ，連 
載で、 Multiplan を糸 g 介していく予定である。 

今回は Multiplan の基礎ということで機能 
の詳細よりは入門的な内容を中心に紹介す 
る。実務にすぐ使いたいという人も，ひと 
まずおつき合い頂きたい。使いこなす上で 
必ず役に立つ内容ばかりである。 

では，+ダヤの知恵者の話から Multiplan 
入門を始めることにしよう。 

ユダヤの知恵者の話 

どんな悩みでも角?-決してくれると評判に 
なったュダヤの知恵者がいた。彼に相談す 
ると，誰もの悩みが解決されるというのだ。 

ある人が「いったいどうすればどんな悩 
みでも解決できるのですか？ 良い方法が 
あるのなら教えてください」と知恵者に賴み 
込んだ。知恵者は「私のところにくる人は 
みんな，どうすればよいかと質問するので 
す。そこで私は，紙とペンを用意してこう 
言います。どんな解決方法があるのか，一 
見不可能な方法でもとにかく思いつく限り 
この紙に書いてみてください。ただし具体 
的に書くこと。自殺するとか，駆け落ちす 


るとか書くだけではだめで，自殺ならどん 
な方法で自殺するのか，駆け落ちならいつ 
どこにどんな乗物で逃げだすのかまで書か 
なければだめですよ，とね」 

「そこで初めて，どの方法が一番良いかを 
教えてあげるのですか？」と聞き返すと， 
知恵者は「とんでもない。相談にやって来 
た人が，この方法が自分には一番いいと思 
うのでやってみます，と自分で選んで帰っ 
てい〈のです j と笑って答えた。 

ユダヤの知恵者の話を最初にしたのは， 
Multiplan が何のためのソフトかを理解する 
のに助けになる話だからである。 

知恵者は，①自分で，②思いつく限りの 
方法を，③できるだけ具体的に書〈ことを 
指示した。そうすると，相談に来た人は最 
善と思う方法を自分で見つけていくという 
のである。 

これがどういうことかと言うと，相談に 
来る前までは頭の中だけで考えているから， 
いつまでたっても具体的な解決策は出てこ 
ない。考える内容も，これからどうしよう 
という前向きなことよりも，どうしてこん 
なことになってしまったのかという後ろ向 
きなことが中心になってしまう。これでは 
いつまでたっても解決策は出てこない。 

しかし，ユダヤの知恵者の教えのように， 
これからのことだけに集中すれば， いくつ 
かの方法は思い浮かぶはずだ。ただ，それ 
も抽象的な表現だけでは，やはり「解決策」 
にはならない。だから，知恵者はできるだ 
け具体的にと教えるのである。 

具体的に方法を書いてみれば，実現性や 







図 1 どうやったら儲かるか 


図2儲けの試算 



商品正価 

100 ,000円 

販売価格 

80,000円 

販売数量 

150台 

1 売上合計 

12 ,000,000円 | 

仕入れ価格 

70,000円 

1 仕入れ額計 

10,500,000円 | 


I 人件費 

2,400,000円 | 


「儲け 

一900,000円 | 


( 10万円 x 80%) 
(3 台/週 X 50週） 

(8 万円 x 150台） 
( 10万円 X 70%) 
(7 万円 x 150台） 
(20 万円 X 12力月） 
(売上-仕入れ-人件費) 


図3 儲けを100万円にする 


①数を増やす 


③ tt 入れ価格を下げる 

150台 

90万円の赤字 

70% 

90万円の赤字 

200 台 

40万円の赤字 

65% 

15万円の赤字 

300台 

60万円の儲け 

60% 

60万円の儲け 

400台 

160万円の儲け 

57% 

105万円の儲け 

340台 

100 万円の儲け 





④固定費を削る 


②価格を上げる 


月20万円 

90万円の赤字 

20 %引き 

90万円の赤字 

月15万円 

30万円の赤字 

15%引き 

15万円の赤字 

月10万円 

30万円の儲け 

10 %引き 

60万円の儲け 

月5万円 

90万円の儲け 

7%引き 

105万円の儲け 

月4万円 

102 万円の儲け 



損得などを比較しやすくなる。だから自然 
に解決方法が見つかる仕組みなのだ。 

Multiplan は，この知恵者の教えをビジネ 
ス分野で実践するために作られた道具なの 
である。 

ビジネスへの応用 

人はそれぞれ悩みを抱えて生きている。 
しかし，ビジネスに限定すれば悩みは「ど 
うやったらもっと儲かるか」に尽きるはず 
だ。人生は金がすべてではないが，ビジネ 
スでは金儲けがすべてである。別に金にガ 
ツガツしろとか，金に汚くなれというので 
はない。一定のルールやフェアプレイ精神 
が要求されるのはゲームやスポーツと同じ 
である。ゲームやスポーツは「勝つ」とい 
う単純な目標の上に成り立っているのに対 
し，ビジネスは「儲ける」という単純な目 
標の上に成り立っているのである。 

儲けるには売上を伸ばし，コストを削る 
ことである。売上を伸ばすには販売価格を 
上げる，販売数量を増やすという2つの方 
法がある。コストダウンは，変動費を削る 
か同定费を削るかの2つに分かれる（図1参 
照)。 

数量 • 単価 • 変動费 • 固定費の4つの数 
字を変化させることで儲けを増やすことが 
できるわけだ。 

しかし販売量を増やすとか，固定費を削 
るというのは「具体的に」という知恵者の 
教えに反している。 

売上を伸ばすには，まず具体的に目標を 
決めること。このときに重要なのは個々の 
数字が実現可能な数字かどうかにはこだわ 
らず，まず具体的に数量 • 単価 • 変動費 • 


阀定費を数字で表して儲けを試算してみる 
ことである。 

仮に1年間で100万円儲けたいとする。方 
法は正価が10万円の商品（たとえばビデオ） 
を1人で売りさばくとする。 

具体的に儲けを計算してみよう（図2参 
照)。 

正価では売れないだろうから，20%引き 
で売るとする。台数は週に3台，年間で150 
台と考えてみる。 

仕入れ価格は正価の70%とする。これは 
売れた台数に比例する費用だから，変動費 
である。そのほかに人件費として月20万円 
を見込む。これは売れても売れなくてもか 
かる費用だから，固定費である。 

このような条件で試算してみると，儲け 
は図2のように90万円の赤字になる。 

目標は年間で100万円儲けることである。 
どうすれば90万円の赤字を100万円の儲けに 
することができるのだろうか。ユダヤの知 


恵者の教えに従えば，思いつ〈限りの具体 
的な方法を書いてみろということになる。 

儲けは，図1のように数量を増やす，価 
格を上げる，変動费（仕入れ単価）を下げる， 
固定費（人件費）を削るという方法で増やす 
ことができる。 

まずひとつだけの要素を変化させて，他 
の3つの要素が最初の条件どおりであった 
場合に目標額「100万円の儲け」を達成する 
ための方法を考える。 

図3のように，数だけであれば150台を340 
台に増やすこと。売値だけを変えるとした 
ら，20%引きを7 %引きにする。仕入れ価 
格を変えるとしたら70%を57%にする。固 
定費を削る場合は月20万円を月4万円にす 
れば儲けは100万円になる。 

実現の可能性はどれも低そうである。ビ 
ジネスは相手があって成り立つのでそうそ 
ううまくいくはずがない。たとえば，340台 
を1年間で売るには毎日休みなく1台売る 
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図 4 Multiplan による試算 (1) 


図5 Multiplan による試算 (2) 


ビデオ販売計画（シミ 

ユレーシヨン用） 


ビデオ販売計画（シミユレーシヨン用） 


単価 

数量 

合計 



単価 

数量 

合計 

正価 

100,000 




正価 

100,000 



割引 （％) 

回 




割引(％) 

0 



販売価格 

80,000 

回 

12 ,000,000 


販売価格 

85,000 


15,300,000 

仕入(％) 

回 




仕入(％) 

回 



仕入価格 

70,000 

150 

10,500,000 


仕入価格 

67,000 

180 

12,060,000 

人件費 

1200,0001 

12 

2,400,000 


人件費 

| 190,0001 

12 

2,280,000 

儲け 



一900,000 


儲け 



960,000 

週当たりの販売 量 

3 



週当たりの販売 置 


4 





ということである。 

これが大変な数字であ 

でも，電卓でやっていたのでは時間ばかり 

この表では数字をひとつ変えると，パソコ 

るということは セー 

■ルスの経験がある人に 

かかってしまう。しかし， Multiplan であれ 

ンが瞬時に計算し結果をはじき出してくれ 

はすぐわかることだろう。しかし， 

台数を 

ばいままでのような試算は短時間でできる 

る。たとえば台数を変える，つまり100を340 

もう少し i 成らして， 

他の要素を変えて100 

し，これから説明するような4つの数をい 

に変えると， 

その瞬間に儲けが，-900,000 


.万円の儲けを達成する方法はあるはずだ。 

4つの要素を少しずつ変化させて，その 
結果100万円儲かるような組み合わせにすれ 
ばもっと現実的な計画になる。 

し、よいよ Multiplan 登場 

今までやってきたような単純な試算だけ 



ろいろな組み合わせで変化させて結果を出 
すことが実に簡単にできるようになるので 
ある。 

図4が Miiltiplan で作ってみた表である。 
画面上には出てこないが， Multiplan で表を 
つくるときは実際の計 U 方法も指定してパ 
ソコンに 覚えさせる。 


写真丨分割画面による表の対照 


さ，舊__ 

Free Hilliplan ： 9PK1E. 


写真2 旧 R 関数による損益処理 


写真3 販売計画のシミュレート 





から1，000,000に変化する。 

だから台数，販売価格(％)，仕入れ価格 
(%)，人件費をいろいろ変えると変える度 
に儲けの試算結果がすぐ表示される。儲け 
を1〇〇万 m にするための台数，販売価格，仕 
入れ価格，人件費を数字を変えて試算しな 
がら決められるわけだ。 

この作業は専門的な言葉で「会話型でシ 
ミュレーシヨンを行う J と言う〇ようする 
に，やり方（計算方法）を決めてパソコンに 
覚えこませておいて，あとは人間が数を与 
えてやる度にパソコンが計算結果を答える 
というわけだ、。 Multiplan というのは，こう 
いう作業をするための便利な道具なのであ 
る。 

実際に Multiplan で作った表で，試算結果 
が即座に表示されるということの凄さは， 
文章や言葉で表現しても，うまく伝わらな 
い。自分でパソコン上でやってみると，ま 
ざまざとパソコンの威力が実感できるのだ 
が……。 

この会話型のシミュレーシヨンをした結 
果のひとつが図5である。つまり台数180台， 
販売価格15%引，仕入れ価格67%，人件費 
19万円であれば，儲けが96万円になるので 
ある。ただし，答えはこの1種類だけでは 
ない。 

台数をもう少し減らして，他の要素を変 
えて儲けを100万円にする計画は他にも作成 
できる。何種類もの具体的な目標を作って 
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図 6 Multiplan は集計用$氏と同じ 
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みるというユダヤの知恵者の教えがこれに 
あたるわけだ。 

Multiplan でシミュレーシヨンをするには， 
先を読む力や，実際にはどうなりそうだと 
いう経.験が重要になってくる。同時にいろ 
いろな可能性を追求してみるという柔軟性 
も必要になる。 

パソコンで Multiplan を使えば，新人でも 
ベテランと同じ仕事ができるようになるわ 
けではない。むしろ，先を読む力や経験の 
差が，手作業のときよりもはっきりと出てく 
るようになってしまう。もっとも.，可能性 
の追求という柔軟性の面では，新人のほう 
がベテランよりも勝っているかもしれない 
が。 

ち5ひとつの使い方 

Multiplan は数字をいろいろ変えて結果を 
調べるというシミュレーション作業ではな 
く，1回だけの作表 • 計算作業にも有効で 
ある。集計表をきれいに早く作りたいとい 
う場合も Multiplan は便利な道具になる。 

ただし，この場合は手作業よりも Multi ¬ 
plan でや るほうが楽になるのは ， Multiplan 
をかなり使いこなせるようになってからで 
ある。 

ハ 0 ソコンの初心者が， Multiplan を使って 
もそう簡単にはきれいな表は作成できるわ 
けではない。し力*し， Multiplan が自在に使 
いこなせるようになるとほとんどの作^表イ乍 
業は，手でやるよりずっと速く，簡単にで 
きるようになる。 

これに対し最初に説明したシミュレーシ 
ョン作業は，電卓での手作業には限界があ 
るが， Multiplan を使えば初七、者でも短1¢問 
に高度なシミュレーションができるように 
なるのである。だから，最初はシミュレー 
ション作業に使いながら，惯れてきたら作 
表作業に使うというような使い方が良いだ 
ろぅ。 

Multiplan の基本 

Multiplan は，図6のように集計用紙とほ 
ぼ同じだと考えればよい。ひとつひとつの 
匚 =] の中には数字，文字,計算式を書くこ 
とができる。実際の集計用紙との一番の違 
いは計算式を書くということである。 

図6の A と B の合計の結果を C に入れた 
い場合には C の位置に A + B というような 


式を宵く。そうすると C の位置には計 P : 結 
果が表示される（計算式は普段は画面には 
表示されない）。 

だから A や B の場所の数字を変更すれば 
常にその計算結果が C の位置に即座に衣示 
される。 

A + B という計算式は Multiplan て、、は， 
R 2 C 4+ R 2 C 5 

という書き方をする。 R 2 C 4 というのは縦 
が2番目で横が4番 H の !~~ 1という意味で 
図6の A の位置を指*しているわけだ。 

この書き方はかなり而倒だが ， Multiplan 
では A の場所にカーソルをもっていってリ 
ターンキーを押せば自動的に R 2 C 4 と入力 
行に表示され，十と書いてから B の位置に 
カーソルを移動してリターンキーを押せば 
R 2 C 5 I ： 表示される。このカーソル移勋キ 
一で場所を指定できるという機能があるの 
で場所の指定は簡単にできる。 

実際に計算式を書く場合に非常に便利な 
のが，関数機能と複写機能である。 

①関数機能 

関数機能は，よ〈使う計算のパターンは 
簡単に指定できる機能である。代表的なも 


のには合計関数がある。 

表形式の計算では，図6の D から H まで 
の合計結果を I の場所に表示するというよ 
うな計算が多い。 

このとき D から H まで□をひとつひと 
つ指定しながらたし算を指定するのは面倒 
である。 

こういうときは， 

SUM ( R 2 C 7 : R 6 C 7) 

D H 

という式を I の場所に書き込めばすむよう 
になっている。この場合も R 2 C 7 という場 
所の指定はカーソル移動キーで簡単にでき 
る。 

関数機能は，合計関数以外にも豊富に用 
意されている。関数機能が自在に使いこな 
せると，計算方法の指定作業がかなり簡単 
になる。 

関数機能については次间で詳しく紹介す 
ることにしたい。 

②複写機能 

表形式の計算指定で，もうひとっよく出 
てくるのが，まったく同じ計算をあちこち 
でやる必要がある場合である。 


CALC ソフトの歴史 


Multiplan に似たソフトはたくさんあって， C 
AL 〇ソフトとかスプレツドシートと呼ばれる。 

この種のソフトは，アメリカで爆発的にヒツ 
卜した Visicalc をもとに改良され発展してきたも 
のである。 

Visicalc は，ハーバード•ビジネススクールに 
在学中の D.S. ブルックリンが，経営計画.経営 
分析の計算実習のあまりの大変さに，なんとか 
パソコンを利用して楽をしようと考えたのがき 
っかけで開発された。パソコンに計算手順を覚 
えさせて自動計算させるというのが基本機能で, 
巳 ASIC でプログラムを組むよりも簡単という意 
味で，簡易言語とも呼ばれた。 

しかし Visicalc は，他のソフトとデータの互換 
性がない，作表機能が貧弱，一度に作れる表の 


大きさが小さいなどの弱点があり，各社から改 
良版が次々に発表された。中でも CP/M 上で動 
く Super 〇 ale は8ビットパソコン用の CALC ソ 
フトとして非常に完成度が高いものである。 

16ビットパソコンが一般的になると，その高 
機能をいかすための CALC ソフトが登場してく 
る。代表的なのがここで紹介した Multiplan であ 
る。16ビットマシンの代表的実務ソフトが，XI 
turbo で使える意義は大きい。 

Multiplane, 命令の選択方法や計算の指定方 
法が簡単になり，一方でファイル間のデータ参 
照という高級機能も用意されていて，応用範囲 
が広くなっている。 Multiplan の日本語対応版は， 
日本の CALC ソフトの標準といって良いもので 
ある。 
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図 7 作業の選択肢 


図8 6つの基本の選択肢 


選択肢 作業内容 

A /文字 文字を集計用紙に害き込む 

B /空白 I Iを空白にする（消す） 

C /複写 I I の内容の他のI 1に複写する 

P /印刷 プリンタやフロッピーへの出力 

Q/ 終了 終了する 

V/数式 数字や計算式を1 Iに書き込む 


選択肢 

作業内容 

A /文字 

文字を集計用紙に書き込む 

B/ 空白 

1 1を空白にする（消す） 

C/ 複写 

1 1の内容の他の丨 1に複写する 

D/ 削除 

行や項目を表から削除する 

E/ 修正 

1 1の内容を害き換える 

F/ 書式 

表全体や1 丨ごとに窖式を指定する 

G/ セル移動 

1 1の内容を他の1 1に移動する 

H/ 解説 

画面上の各機能の説明を表示する 

1 /挿入 

行や項目を表に追加する 

L/ 保護 

I |の内容を変更できないようにする 

M/ 移動 

行や項目を他の場所に移動する 

N/ 名前 

I 丨に名前を付ける 

0 /オプション 

自動再計算機能，警告音機能などのオン/オフ 

P/ 印刷 

プリンタやフロッピーへの出力 

Q/ 終了 

終了する 

S/ 並替え 

表を行単位で並びかえる 

T/ 転送 

他のプログラムとのデータのやりとりをする 

V/数式 

数字や計算式を1 |に害き込む 

W/ 窓 

画面を分割して，表の2個所を同時に表示する 

X/連結 

複数のファイルをひとつのファイルにする 


図6で言えば， C には A + B の結果を， 
C ’ には A ’ + B ’ の結果を表示したいという 
ように，同じ計算をやれば良い場合の計 
算方法の指定に便利なのが，複写機能であ 
る。 

C を C ’ の位置に複写してやると， Multi - 
plan では C ’ には A+B の結果ではなく A ’ + 
B ’ の結果が表示される。つまり自動的に A 
を A ’ に， B を B ’ に変更して複写してくれる 
のである。 

複写元や複写先の位置指定もカーソル移 
動キーで指定できる。 

この複写-機能をうまく使えば，表を作成 
する時間が火幅に短縮できる便利な機能で 
ある。 

Multiplan での作業 

Multiplan では，集計表に文字.数字•計 
算式を書くという作業以外にも，図7のよ 
うないろいろな作業ができる。作業の指示 
は，画面の下に図7の選択肢が表示される 
ので，その選択肢を スペース キーと バック 
スペース （ BS ) キーを使って選ぶという方 
法で作業指示をする。 

書式設定という作業を選ぶと，いろいろ 
と追加で指定したい内容の選択肢が表示さ 
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れるようになって 
いて，かなり複雑 
な作業が，簡単に 
指示できるように 
なっている。 

ただし， Multi - 
plan は最初に書い 
たように機能が豊 
富な奥の深いソフ 
卜であり，それが 
初心者にとっては 
大きな欠点でもあ 
る。まだ使いこな 
せないような機能まで選択肢として表示さ 
れるので，適切な作業を選ぶのが大変にな 
ってしまうのである。 

だから， Multiplan を使い始めるときには, 
とにかく単純な使い方を心掛けることだ。 

図7のようないろいろな機能を全部覚え 
ようとするのではなく，まず図8のような 
6つの作業だけで Multiplan を使うことであ 
る。これだけの機能が使えれば，まず一通 
りのことはできる。 

注意したいのが「見てくれに凝るな」と 
いうことだ。 

初心者が Multiplan をすぐ役に立てられる 
のは，シミュレーション作業（試算の繰り 
返し）をやる場合である。これは計算方法 
さえ指定することができれば，あとは初心 
者でも存分にシミュレーション作業をする 
ことができる。 

この場合，見出し，表示の書式 （3 桁ご 
とにカンマをつけると 力％ m □の幅を変え 
る）というような作業は最初はやろうとし 
ないことである。 

シミ ュレー ション 作業は計算結果が大切 
なのであって，きれいなとか，見やすいと 
いうのは2次的なことである。最初からそ 
ういう2次的なことにこだわっていては， 


Multiplan は使いに〈いと誤解してしまう。 

まず最低限必要な作業に限って Multiplan を 
使ぅべきだ 。 

表をきれいに仕上げるためには，最初は 
操作説明書をあちこちひっくり返すことに 
なる 0 そうやっているうちに 「 Multiplan は 
なんて面倒なんだ。これなら手でやるか， 
ワープロで表を書いたほうがずっといい」 
ということになりかねない。これは使い方 
が基本的に間違っているのである。図8の 
ような必要最小限の機能を使うだけでもか 
なり複雑なシミュレーションができるので 
ある。 

シミュレーション をするのに 重要な のは 
Multiplan の特殊な機能ではなくて，どうい 
う計算方法を指定したら シミュレーション 
ができるかという， シミュレーション •モ 
デル（試算方法）を考える力である。先を読 
む力，数字の妥当性を判断できる経験，可 
能性を追求する柔軟性である。 

Multiplan が使いこなせるようになってく 
ると別にシミュレーション作業のようなも 
のでなくても， Multiplan は便利な道具にな 
る。 

書式設定や印刷書式の設定という機能が 
自由自在に使いこなせるようになると，手 
で表を作るよりきれいな表がごく簡単にで 
きるようになる。 

特に，作っている最中にあちこち変更す 
ることが簡単にできるので，手作業のよう 
に一部を変更するために最初からやりなお 
しというようなことはなくなる。 

あとから，項目の幅を変えたいというよ 
うなことは言隹でも経験が'ある AT ろう oMulti - 
plan ではこ.ういう変更作業がごく簡単にで 
きるのである。また，9000と入力すれば¥ 
9,000というように表示するようにするよう 
な機能も準備されている。 

これらの機能は次回以降で取り上げるこ 


































図 9 表は分割して作ること 


.1 総括表1 



トップ. レベル 

1 固定費小計丨 

1 変動費小計1 

1 月別売上表1 

ミドル • レベル 

人件費明細1 

1 その他明細丨 


デイテイル • レベル 


個々の表を丨画面におさまるようにすれば，作業が楽だし，わかりやすい表になる。 

|画面におさまらない時は，小計を計算する表をいくつか作って，総括表は必ず丨画面におさまるようにする。 


とにする。もう一度強調したいのは，最初 
からそういう機能ばかりに凝ってしまうと， 
道に迷ってしまうということだ。 

Multiplan を使い始めたばかりなのに，こ 
ういう作業をすぐにやろうとしても，説明 
書をあちこちひっくり返す手間ばかりで， 

手作業より効率が落ちる。そういう期間を 
しばらく我慢して Multiplan に惯れてしまえ 
ば，逆に手作業が面倒に思えることは確実 
である。 

表の作 D 方 

Multiplan を自在に使いこなせるようにな 
ると，大きくて複雑な表が作れるようにな 
る。 Multiplan は，最大で縦255行，横の項 
目数63という表が作れることになっている。 

しかし，だからといって横の項目数が40 
も50もあるような表を作ることは意味がな 

い0 

画面の大きさ以上の表を作っても一度に 
は全体を見れない。一度に全体が見れない 
表は作るのも大変だし，実際に試算したり 
するにも使いにくい。 

では，なぜ画面の大きさ以上の表が作れ 
るようになっているかというと，それは図 
9のような使い方をするためである。 

最初 に 説明した100万円儲けるための シミ 
ュレ ーション作業には，実際には もっと 多 
くの要素が関係する。たとえば商品の運送 
費，運転資金を借り入れた場合の利息，通 
信費，倉庫费用など数え上げればいくらで 
も出てくる。 

だからと言って，大きな表ばかりを作っ 
てもわかりにくくなるだけである。最初の 
シミュレーションは， 要素を絞ってあるか 
ら試算作業がしやすいし，内容が理解しや 
すいのである。 


だから，実務的なシミュレーションをし 
たい場合でも基本的には最初の例のような 
大きさの表でやるのでなければ意味がない。 
ただし，仕入れ費用を変動費，人件費を固 
定費というように捕らえてシミュレーショ 
ンをするのである。 

そして変動費いくら，固定費いくらとい 
う目標が決まったら，今度はもう少し細か 
く変動費の中身，固定費の中身を試算して 
みる。 

逆に集計作業をしていくような場合も， 
明細表をいくつか作って小計表を作り，そ 
の小計を集めて合計するための総括表を作 
る。 

それぞれの表は必ず画面に入りきるよう 
に作っておけば，常に関係項目がすべて一 
度に見えているわけだから，ポイントがつ 


かみやすい表になる。 

大きな表をただ作ってみても，いったい 
何がポイントなのかはよくわからなくなっ 
てしまう。 

そのために，ここで説明したような表の 
作り方をしておけば，各レベルごとにボイ 
ントが明確になる。これは Multiplan を使う 
上でだけではなく，資料を作る時にすべて 
に使える考え方なのである。 



今回は入門編であり，実務にすぐ使って 
みたいと思っている人には，少し情報不足 
だったかと思う。し力、し， Multiplan を使い 
こなす基礎としては必要な内容なのである。 

次回以降で，実務ですぐ使えそうな表を 
取り上げながら, Multiplan の各機能を詳し 
く紹介していく予定である。 

実務にパソコンを活用したいと考えてい 
る人で，困っていることや質問があれば， 

ハガキに書いて送ってほしい。できる限り 
この連載のなかで取り上げ，いっしよに考 
えていきたい。 

また，読者の皆さんの中で，実務にパソ 
コン（特に Multiplan ) を活用しているとい 
う人がいたら，連載中に紹介したいと考え 
ているので，その活用方法などもぜひ送っ 
てください。 


CALC ソフトとデータベースソ- 


実務用のソフトには， Multiplan のような CA 
LC 系の他にデータベースがある。両者は機能や 
用途がまるで違うソフトなので注意が必要であ 
る。 

CALC 系のソフトは，マクロ機能によって表形 
式の計算，結果の表示•印刷をする「特定目的 
用のプログラム言語」なのである。 

この データ とあの データの 合計をある場所に 
表示（印刷）しろ，何行目に横線を引けというよ 
うな命令を組み合わせて，表形式の計算 • 結果 
の表示をするための言語で， BASIC に比べブロ 
グラムの作成や変更が非常に簡単なことから， 
「簡易言語」とも呼ばれる。 

データベースは， BASIC でいえば 「DATA 文 
だけ j を作るソフトである。その DATA 文を使っ 
て何をやるかという処理部分はユーザーが独自 
にプログラムを作成する。もっとも最近のデー 
タベースはプログラム言語や自動実行機能を持 
っており，分類•集計•検索という頻繁に使う 
機能はひとつの命令でできるようになっている。 

両者とも表形式でデータを並ぺるので，同じ 


種類のソフトという誤解が多い。簡単に言うと， 
CALC 系ソフトは数値処理を主としているが， 
データべースタイプのアプリケーションは，文 
字列の処理が中心となるので，情報の種類によ 
って使い分けたほうがよい。しかし，計算をし 
ろ，線を引けという命令が多く，表処理が複雑 
な場合には CALC 系ソフトが向いている。 

逆に処理は単純だが，データ量が多く他のデ 
一夕と重複する部分が多い場合などはデータべ 
—ス向きなのである。 

表集計の例 （ CALC ソフトの用途） 

第3期販売実績 （千円） 



10 月 

II月 

12 月 

計 

テレビ 

480 

288 

864 

1632 

ラジオ 

12 

6 

15 

33 

ワープロ 

344 

172 

774 

1290 

計 

836 

466 

1653 

2955 
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▼試験に出る XKZ / 

第8回 

FDC は挑戦的である 


私が講師の祝一平だ一ぞと。 

今月は先月に引き続いて，フロッピーデ 
ィスクについてやるのである。先月は概論 
および， HuBASIC 上におけるソフト的な 
フォーマットであった。今月の方針として 
は，ひとまず FDC に詰め寄り，抜く手も見 
せずにフロッピーディスタの深遠へと向か 
うつもりである。残念ながら，フォーマット 
などのェグイ部分は来月回しである。 

と D あえず FDC について 

FDC (Floppy Disk Controler ) とは， 
そのものずばりに，フロッピーディスクを 
コントロ ール するための LSI である0 FDC 
の種類は，「単密度専用」と「倍密/単密両 

表 21 (TYPE I フラグ機能表） 


Iwai Ippei 

祝一平 

用 j の2つに分かれるが，「単密度専用 FD 
Cj はすでに過去の遺物なので，「倍密/単 
密両用 FDC 」 についてのみ書くことにする。 
倍密/単密両用 FDC は， 

表 1 MB8876/8877 のコマンド 


1 ) FD 1791 ファミリ 

2) ^ PD 765 フアミリ 

3) その他 
に分かれる。 


タイプ 


コマンド名称 

動 作 

7 

6 

5 

4 

3 2 10 

XI での標準的な値 


0 

リストァ 

トラック0へ，へッドを移動する 

0 

0 

0 

0 

h Vn ro 

0 2h= 

0 

0 

0 0 

0 

0 

1 

0 


1 

シーク 

所定のトラックへ，ヘッドを移動する 

0 

0 

0 

1 

h V n ro 

1 Eh = 

0 

0 

01 

1 

1 

1 

0 

I 

2 

ステップ 

ヘッドを1トラック移動する 

0 

0 

1 

U 

h V n ro 

3 Ah = 

0 

0 

11 

1 

0 

1 

0 


3 

ステップ.イン 

ヘッドを1トラック内側へ移動する 

0 

1 

0 

u 

h Vn ro 

5 Aji = 

0 

1 

01 

1 

0 

1 

0 


4 

ステップ.アウト 

ヘッドを1トラック外側へ移動する 

0 

1 

1 

u 

h V n ro 

7 Ah = 

0 

1 

11 

1 

0 

1 

0 

TT 

5 

リードデータ 

ディスクのデータ（データフィールド）を読む 

1 

0 

0 

mS E C 0 

8 0h = 

1 

0 

0 0 

0 

0 

0 

0 


6 

ライトデータ 

ディスク(データフィールド)へデータを書き込む 

1 

0 

1 m S E C ao 

A0h = 

1 

0 

10 

0 

0 

0 

0 


7 

リードアドレス 

ディスクの ID フィールドを読む 

1 

1 

0 

0 

0 E 0 0 

COh = 

1 

1 

0 0 

0 

0 

0 

0 

m 

8 

リードトラック 

ディスクの1トラック分の全データを読む 

1 

1 

1 

0 

0 E 0 0 

E 0 h = 

1 

1 

10 

0 

0 

0 

0 


9 

ライトトラック 

ディスクへ1トラック分の全データを耆き込む 

1 

1 

1 

1 

0 E 0 0 

F0h = 

1 

1 

11 

0 

0 

0 

0 

N 

10 

フォースインタラプト 

割り込みを発生させる 

1 

1 

0 

1 

13 12 ll lo 

D0h = 

1 

1 

01 

0 

0 

0 

0 


表 2-2 ( type II , m フラグ機能表） 


フラグ 


U 


h 


V 


_機_能_ 

トラックレジスタ更新フラグ （ u ) は，ヘッド移動に際し，トラックレジスタを更新す 
る事を指示する。 

U =1 :トラックレジスタを更新する。 

_ u =0:トラックレジスタを更新しない0 _ 

ヘッドロードフラグ （ h ) は，コマンド実行開始時にヘッドをロードするか，ヘッドを 
メディアから離すかを指示する。 

h =1：コマンド実行開始時にへッドロードする。 

_ h = 0 :コマンド実行開始時にへッドを離す、_ 

トラック照合フラグ（ V )は，ヘッド移動後，ディスクのトラック番号とトラックレジ 
スタの照合を行うかを指示する。 

V =1:トラックの照合を行う。 

V = 0 ：トラックの照合は行わない。 


ステップレートフラグ （ n , ro ) は.ステップパルス出力の間隔を指定する。 



クロック 

n ro 

1 MHz 

( X1 ノーマル） 

2 MHz 

( turbo の 2 HD ) 

0 0 

6 ms 

3 ms 

0 1 

12 ms 

6 ms 

10 

20 ms 

10 ms 

1 1 

30 ms 

I 5 ms 


表 2-3 (TYPE IV フラグ機能表） 


フラグ 

機 能 

lo 

10 =1 で REDY 入力の立ち上りで IRQ 発生 （IRQ = “ H ")。 

ll 

h = l で RED Y 入力の立ち下がりで IRQ 発生。 

1 2 

12 = 1でインデックスパルス検出時に IRQ 発生 

1 3 

1 3 =1で無条件でただちに丨 RQ 発生 


注*: Xl/Xl turbo に使われている MB 8877 の IRQ 信号は OPEN (どこに 
もつながつていない）だから，丨 RQ は何の機能も果たさない。 


フラグ 

機 能 

m 

マルチレコードフラグ （ m ) は連続セクタでリード/ライトするかを決める。 
m = 1:連続セクタ（セクタ番号が増加する方向）でリード/ライトを行う。 
m =0 :単ーセクタでリード/ライトを行う。 

S 

サイドフラグ （ S ) はサイド番号指定に使う。 

S = 1:サイド番号の LSB が1のとき一致したものとみなす。 

S = 0 :サイド番号の LSB が0のとき一致したものとみなす。 

(このフラグは， C フラグが1のときのみ有効） 

E 

ディレイフラグ （ E ) は HLT 信号のサンプリングのタイミングを指定する。 

E = 1 : HLD (ヘッドロード）信号を “ H " としたのち 15 ms 待ち. HLT 信号をサン 

プリングする。 

E = 0 : HLD 信号を“ H ” としたのち，ただちに HLT 信号をサンプリングする。 

C 

サイド番号比較フラグ （ C ) はサイド番号と比較（チェック）するかどうかを指示する。 
c = 1 :サイド番号の比較を行う。 

C = 0 :サイド番号の比較を行わない0 

ao 

アドレスマークフラグ （ ao ) はデータアドレスマークに何を害くか指定する。 
ao = 0 ：データアドレスマークに ( FB)h (Data Mark ) を書く c 
ao = 1：データアドレスマークに （ F 8 )h (Deleted Data Mark ) を窨く。 
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ステ-ータス 
コマン^'^ スタ 

bit 7 

bit 6 

bit 5 

bit 4 

bit 3 

bit 2 

bit 1 

bit 0 

TYPE 

I 

すべての 

コマンド 

NOT 

READY 

WRITE 

PROTECT 

HEAD 

ENGAGED 

SEEK 

ERROR 

CRC 

ERROR 

TRACK00 

INDEX 

BUSY 

TYPE 

II 

リード 

データ 

NOT 

READY 

0 

RECODE 

TYPE 

RECODE 

NOT 

FOUND 

CRC 

ERROR 

LOST 

DATA 

DATA 

REQUEST 

BUSY 

ライト 

データ 

NOT 

REAEY 

WRITE 

PROTECT 

WRITE 

FAULT 

RECODE 

NOT 

FOUND 

CRC 

ERROR 

LOST 

DATA 

DATA 

REQUEST 

BUSY 

TYPE 

III 

リード 

アドレス 

NOT 

READY 

0 

0 

RECODE 

NOT 

FOUND 

CRC 

ERROR 

LOST 

DATA 

DATA 

REQUEST 

BUSY 

リード 
トラック 

NOT 

READY 

0 

0 

0 

0 

LOST 

DATA 

DATA 

REQUEST 

BUSY 

ライト 
トラック 

NOT 

READY 

WRITE 

PROTECT 

WRITE 

FAULT 

0 

0 

LOST 

DATA 

DBTA 

REQUEST 

BUSY 

TYPE 

IV 


'他のコマ^ 

ンド実行 

1中の場合 j 


(今まで実行していたコマンドのステータスビットと同様の意味） 

0 

1 

f 実行中の) 

コドの 

1ない場合. 


NOT 

READY 

WRITE 

PROTECT 

HEAD 

ENGAGED 

0 

0 

TRACK00 

INDEX 

0 


コマンド 

ステータス 

意 味 


NOT READY 
(bit 7 ) 

NOT READY = 1 でディスクドライブが動作可能状態でない事を示す。 


WRITE 
PROTECT 
(bit 6 ) 

WRITE PROT EC T =1 でディスクへの害き込みが禁止されている事を示す。 


HEAD 

ENGAGED 
(bit 5 ) 

HEAD ENGAGED = 1 でへッドがメディアに押しつけられている事を示す。 

TYPE 

I 

SEEK 

ERROR 
(bit 4 ) 

SEEK ERROR = l でべリファイ動作が成功しなかった事を示す。これは， ID フィールドが検 
出されなかったか， ID フィールドのトラック番号とトラックレジスタの内容が一致しない事に 
よる。 


CRC ERROR 
(bit 3 ) 

CRC-ERROR = l で， ID フィールド読み出し時に読み出しエラーがあった事を示す。 


TRACK00 
(bit 2 ) 

TRACK00 = 1 でディスクのへッドがトラック 0 の上にある事を示す。 


INDEX 
( bit 1) 

IN DEX = 1 でインデックスホールを検出した事を示す。 


BUSY 
( bit 0 ) 

BUSY = 1 で FDC がコマンド動作中である事を示す。 


NOT READY 
(bit 7) 

NOT READY = 1 でディスクドライブが動作可能状態でない事を示す。 


WRITE 

PROTECT 
( bit 6 ) 

WRITE PROTECT = l でディスクへの害き込みが禁止されている事を示す。 


RECODE TYPE 
/WRITE FAULT 
( bit 5 ) 

リード動作の時， RECODE TYPE の表示として，デリーテッドデータマークの時セットさ 
れ， データマーク時リセットされる。 

ライト動作の時， WRITE FAULT の表示として，窨き込み動作が打ち切られた事を示す。 

TYPE 

II 

/ 

RECODE 

NOT FOUND 
( bit 4 ) 

RECODE NOT FOUN D = 1 で指定されたトラック番号.サイド番号，セクタ番号を持ち，正 
しく読み出された ID フィールドがなかった事を示す。 

III 

CRC ERROR 
( bit 3 ) 

CRC ERROR = l でディスクから ID フィールドもしくはデータフィールドの読み出しにおい 
て.読み出しエラーがあった事を示す。 


LOST DATA 
(bit 2 ) 

LOST DATA = 1 で所要時間内に DR の読み出し，もしくは害き込みが行われなかったデータ 
があった事を示す。 


DATA 

REQUEST 
(bit 1) 

DATA REQUEST = 1 で， FDC がプロセッサに対して DR の読み出しもしくは書き込みを要 
求している事を示す。 


BUSY 
(bit 0 ) 

BUSY = 1 で FDC がコマンド実行中である事を示す。 


表 4 ( FDC 関係 I / O アドレス） 


0FF8n 

ステータスレジスタ （STR)/ コマンドレジスタ （CR) 

IN/OUT 

0FF9h 

トラックレジスタ <TR) 

IN/OUT 

OFFAh 

セクタレジスタ （SCR) 

IN/OUT 

OFFBh 

データレジスタ （DR) 

IN/OUT 

OFFCh 

FM 方式指定/ドライブ NO. サイド.モーター ON 

IN/OUT 

OFFDh 

MFM 方式指定 


OFFEh 

I.6M タイプ (2HD) 指定 


OFFFh 

500K(2D) IM(2DD) 切り替え 



I I の部分は turbo 用 


OFFCh 出力内容の意味 
7 6 5 4 3 2 10 

丨 ixcKi cxixm 

'•f •• 

1 -ドライブ NO. (0 ~ 3 ) 

-サィド指定 

0=サイド0 
I =サィド I 
モーター ON/OFF 
0=OFF 
I =0N 

FD 1791 はウェスタン•ディジタル社が開 
発した FDC で， Xl / Xlturbo に使われてい 
る MB 8877 (富士 M 製）は FD 1791 ファミリ 
に属する。それに対して 〆 PD 765 は日本電 
気の開発した FDC である。当然のことであ 
るがこれら2つのファミリの間に互換性な 
どという「なごやかな人間関係」は存在し 
ない。 

ちなみに， FM シリーズの FDC は XI と同 
じ MB 8877， MZ シリーズは MB 8876 を使っ 
ている。8877と8876の違いは，パ、スライン 
が正論理か，負論理の違いだけである。具 
体的には，データの0/1が反転するのであ 
る。すなわち， XI でディスクに & HFF =& 
B 11111111 というデータを書き込み，その 
ディスタを MZ のドライブに差し込むと& 
H 00二 & B 00000000が読み出せるというわ 
けである。その他はまった〈同じであるか 
ら，唯一の問題は XleMZ 間でディスクの 
やり取りをする場合だけである。おっと， 
忘れちやいけない。 XI と MZ の f "' ィスクの 
互換性といえば，もうひとつあるのだ。す 
なわち ， SIDE 0/1が逆なのだ。試してみ 
るとわかるが， XI の第0レコードは MZ の 
第16レコードである。逆に， MZ の第0レ 
コードは XI の第16レコードである。 

本題に入る。表1が MB 8876/8877 のコマ 
ンド，表2が各フラグの意味，表3がステ 
ータスレジスタの意味である。ど一だ，こ 
れだけでは意味がわからんだろう。そこで 
順に解説していくわけだが，その前に表4 
がある 0 これが Xl / Xlturbo での FDC 関係 
の I / O アドレスである。青色に塗られた部 
分は XI turbo 用なので，とりあえず今月は 
使わない。 


表 3-1 (ステータスレジスタの各ビットの意味） 


表 3 2 ( ステータスの意味） 


TYPE I の実習 

FDC ， MB 8877 を実際に使ってみるので 
ある。まず， TYPEI のコマンドは機械語 
でなく， BASIC からでも使えるのでちよう 
ど良い肩ならしである。ただし， FDC を誤 
って動かすとデイスタの内容がパーになっ 
たりすることがしばしばあるので，書き换 
わってもよいデイスク以外はセットしない 
ように。 


FDC を使う前にしなければならないの力 5 ', 
ドライブのセレクトとモーター ON である。 
これには， OFFCh 番地を使うのである。ま 
ずドライブ1 (“1 : ”） に壊れてもよ I 、 フオ 
ーマットした ディスタを入れて， BASIC か 
ら直接 

OUT & HFFC ，& H 81 


と打ち込んでいただきたい。ドライブ1の 
赤い LED が付き，ディスクが回り出したは 
ずである。不幸にしてドライブ0しか持つ 



































































































































































100 INPUT "STEP RATE" ； S：IF (S<0) OR (S>3) THEN 100 
110 OUT &HFFC,&H81 : , MOTOR ON "1:" 

120 GOSUB"WNBSY" 

130 OUT &HFF8.&H0+S : ’RESTORE (第 0 トラックへシーク） 

140 GOSUB"WNBSY" 

150 OUT &HFFB,39 : ，データレジスタ ♦目的トラック番号 =3 9 

160 OUT &HFF9 ,0 :’ トラック レジスタ — 現在のトラック番号 

170 OUT &HFF8.&H1C+S : J SEEK 

180 GOSUB”WNBSY” 

190 IF INKEY$(0>=，"，THEN 130 
200 OUT &HFFC,&H1 
210 END 

220 LABEL"WNBSY" 

230 PRINT"]";SPACE$<3>; 

240 STAT=INP(&HFF8) : , GET STATAS BYTE 

250 PRINT RIGHT$("0 M +HEX$(STAT),2) ； SPACE$(2 )； 

260 IF STAT AND &H81 THEN 240 
270 PRINT" : " : RETURN 


てない人は， & H 81 のかわりに & H 80 であ 
る。ドライブ0が回り出すであろう。冷た 
いようだが以下同様。 

いつまでも回していてもしかたがないの 
で止めることにする。 

OUT & HFFC ，& H 01 (もしく は & H 00) 

と打ち込むと，約1秒後にディスクが止ま 
る。なぜ1秒後かというと，これはディス 
クが回り出してから，読み書きできるよう 
になるまでに時間がかかるからなのだ（わ 
かるかな？）〇つまり普通のディスタアクセ 
ス法として一番自然な方法は， 

① ディスタを回し始める。 

② ディスクが規定の速度（毎分300回転）に 
なるまで待つ。 

③ 読んだり書いたりする。 

④ ディスタを止める。 

となっている。 

問題は，①〜④をやった後で，すぐにま 
た①〜④に飛んでくるケースが多いことに 
ある0④で一旦ディスクが止まってしまっ 
ているから，（すぐさま）次にやってきたと 
きに，またディスクが定常状態になるまで 
待たなければならないのである。これでは 
時間の無駄が大きいので，④で「モーター 
オフ」の信号を受け付けても，すぐにはデ 
ィスタのモーターを止めず，1秒間の遅延時 
間を置くのである。これで，次にすぐさま 
やってきても，待たされないですむのであ 
る。めでたし，めでたし。 

では，もう少し進んでみる。リスト1で 
ある。 

まずは FFCh —81 h で，ドライブ1のモー 
ターを ON する 。 GOSUB “ WNBSY ” で， 
ディスタが正しく定常状態になるまで待つ。 
次に FF 8 h (コマンドレジスタ） へ 02 h (表 
1のリストア コマンド） を OUT する。これ 
で，ドライブのヘッドは第0トラック（一 
番外側）へ移動してくれる。もちろん，へ 
ッドという重さのある「ブツ」が動くわけ 
で多少の時間がかかるから，130行の GOSU 
B 〜で動作の完了を待ってやる。 

140 行〜 170 行は 「シーク」である。この 
コマンドの使い方は，まずは下準備として， 
FFBh (データレジスタ）に目的トラック 
番号を OUT し， FF 9 h (トラックレジスタ） 
へ現在のトラック位置を OUT する。次にコ 
マンド レジスタへ シークコマンド （ IEh ) を 
送れば，「ククタクッ j という音を立てて， 


第20トラックを目指してへッドが動いてく 
れる。 

その次はステップ•インで，ようするに 
1トラックた*け内個 j にシークする。 

さて，220行からのサブルーチンであるが, 
これは FF 8 h (ステータスレジスタ）を見張 
りつつ， MSB と LSB (第7ビットと第〇ビ 
ット）がともに0になるのを待つものであ 
る0第7ビットは 「NOT READY 」， すな 
わち「まだ準備できてないよ」という意味。 
第0ビットは 「 BUSY 」， すなわち「いま忙 
しいのつ！」もしくは「まだ働いている最 
中でんがな。そ’ないにせかさんといてや」 
という意味である。注意しておくが I / O の 
FF 8 h 番地は 

OUT したときは コマンドレジスタ 
IN したときは ステータスレジスタ 
となっている。1番地2役なのだ。 


このプログラムでは，ステータスの内容 
をチェックする意味で，いちいちプリント 
させている。実行結果は，図1のようにな 
るはずである。ちょっと，見てみる。 

まず””は， 「 WNBSY が始まったよ」 
という意味である。最初のやつは，モータ 
ーオンから定常状態になるまで待っている 
わけだから，案の定 A 0 h = 10100000 b で第 
7ビットが1である。いっしょに第5ビッ 
卜も立っている力 5 ',これは「ヘッドがデイ 
スタに押しつけられている」ということを 

示している-はずだが，どっこい。実は 

XI ではこの信号は何の意味もないのであっ 
た。 

ちょっと、;荣入りする力 ? ， FDGeFDD 間に 
は HLD と HLT という信号がある 。 HLD 
は FDC 力、ら FDD への「へッドをデイスタに 
押しつけなさい」という信号である 。 HLT 




100 

OUT 

&HFFC,&H81 

: , MOTOR ON "1:" 


110 


GOSUB" WNBSY *' 



120 

OUT 

&HFF8.&H2 

:， RESTORE ( 第 0 トラックヘシ - 

- ク） 

130 


GOSUB .'WNBSY" 



140 

OUT 

&HFFB,20 

:’ データレジスタ—目的トラッ 

ク番号 

150 

OUT 

&HFF9,0 

:’ トラックレジスタ—現在の卜 

ラック番号 

160 

OUT 

&HFF8,&H1E 

: , SEEK 


170 


G0SUB' , WNBSY" 



180 

OUT 

&HFF8.&H5A 

: »STEP IN 


190 


GOSUB"WNBSY" 



200 

OUT 

&HFFC.&H1 



210 

END 




220 

LABEL"WNBSY" 



230 

PRINT" 】 ” ； SPACE$(3); • 



240 

STAT=INP(&HFF8) 

: , GET STATAS BYTE 


250 

PRINT RIGHTS( M 0"+HEX$(STAT),2);SPACE$(2); 


260 

IF STAT AND &H81 THEN 

240 


270 

PRINT": M : RETURN 
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〇 〇 1 1 
A A 〇 2 

〇 〇 1 1 
A A 〇 2 : 

〇 〇 1 1〇 
A A 0:22 

〇 〇 14 11 
A A 0 0 2 2 

〇 〇 15 11 
A A 0 0 2 2 


AOAO 


111 


1 

2 


〇 〇 1111 
A A 0 0 2 2 

〇 〇 1111 
A A 0 0 2 2 

〇 〇 1111 
A A 0 0 2 2 


〇 〇 1111 
A A : 〇 〇 2 2 : 


〇 〇 1 1 
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は FDD から FDC への信号で「私こと FDD 
はディスクにヘッドを押しつけました。慎 
しんでご報告いたします」というものであ 
る。しかし XI では， HLD はオープン ， H 
LT は5 V ヘプルアップされているのだ〇す 
なわち， HLD 信号は何にも使われておらず， 
HLT は常に High のままである。これはど 
ういうことかというと，5%インチ以下のサ 
イズの フロ ッ ピー ディスクドライブでは一 
般的に「ヘッドは常にディスクに押しつけ 
られているから」なのだ。確認していない 
が, XI の FDD もそうなっているはずである。 

よって第5ビットは無視すべきである。 

さて，図1の2行目中ほどに 「 A 2」 とい 
うのが1力所出てくる。これは第1ビット 
が立っているのである。表 3-1 から 「INDE 
X 」とわかる。すなわち， FDC はこの瞵間 
にインデックス ホールを 検出したのだ〇あ 
とはず一っと AOh で，最後に第7ビットが 
0になり 「NOT REAEY ではない」。すな 
わち「用意できたよ一ん」となって WNB 
SY からリターンするのである。言い遅れた 
力 ? ，このような ステー タスになるのは，直 
前（最後） に FDC に送られた コマンドが T 
YPEI の コマンドだった からである。しか 
し， TYPE がなんであっても 「NOT REA 
DY 」 と 「 BUSY 」 は同じことだから，悩む 
必要はない。 

次に WNBSY に来るのは ， RESTORE 
(リストア：トラック0へのシーク）のとき 

である。 01h=00000001b と， BUSY が並ん 
でいる。最後のほうは， 05h, 04h となって 
いる。 05h は表 3-1 からわかるように 「TRA 
CK 00 です AND BUSY 」 である。ちょっと 
侍て！てめ 一， すでに TRACK 0 に来てる 
んなら， RESTORE 動作は終わってんじゃ 
ね一か。それなのに BUSY とはなにごとだ 
と一瞬逆上する力％次の 04 h で FDC は ， B 
USY を取り下げている。む一ん。それにし 
ても第5ビットが0だ——いったいど一な 
ってんだ。ま，シカト（無視）を決め込む 
ことにするのである。 

次がシーク コマンド 後の WNBSY である。 
おっと， 21h=00100001b だ。第 5 ビットが 

立っている。いやいやシカトシカト。え一 
と，こっちは平凡に BUSY が0になって終 
わりである。 

最後がステップ•インである。これはシ 
ークと同じである力 ? ，移動距離が短いので 


あっという間に終わっている。 

以上で図1の実感放送を終わる。 

ではまず，シークコマンドについて少々 
補足しておく。 シークコマンドでは， 

デ ー タレジスタ <— 目的トラック番号 
トラックレジスタ—現在のトラック番号 
とセットするわけだが，ど一してこんな面 
倒なことをするかというと， FDC が何台も 
の FDD を管理しているからなのだ。つまり， 
何台もの FDD を操作させているのだから， 
「現在のトラック番号」は XI の場合全部で 
4つある。本来，トラックレジスタは移動 
後の「トラック番号」を保持しているので， 
1台のドライブだけを動かしている場合は， 
目的トラック番号をデータレジスタにセッ 
卜するだけで 0 K なのである。しかし現実は 
ほとんどのシステムで FDD は2台以上ある 
から， DOS は4バイトのワークエリアを持 
っていて，いちいちトラック番号を保持， 
書き込みしてやらなければならない。 

トラックレジスタがトラック番号を持っ 
ていることを確認するためには， 
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を入れてやれば良い。“20”，“21”と表示さ 
れるはずである。 

次に大事な「フラグ」について説明する。 
リストアには， h ， V ， n ， ro の4つのフラ 
ダがあり，各動作を指定している。まずは 
S 2-1 を見ると， 

h = へッドロー ド フラグ 
とある。これはさっき言ったように無意味 
である。次に 

V = トラック照合フラグ 
である。これは実際にディスクを読んで， 
チェックするかどうかのフラグである。デ 
ィス クには「私は第△トラックの第 x サイ 
ドの第〇セクタです」という 「 ID 」 が書か 
れているのだ。これを読んで，ヘッドが本 
当に目的のトラックに達したかどうかのチ 
ェックを指定するフラグである。リスト1 
では 02 h だから V =0 で，チェックは行ってな 
い。これについては，あとで実験をする。 

次に ri ， ro である力 ? ，これは2つで1組 
で， 00 b 〜 11 b までの4つの状態があり，こ 
れはステップレートを指定するものである。 





.Z80 






.PHASE 

0DF00H 


0FF8 


6r 

EQU 

0FF8H 

；COMMAND REG. 

0FF8 


STR 

EQU 

0FF8H 

；STATUS REG. 

0FF9 


TR 

EQU 

0FF9H 

；TRACK REG. 

0FFA 


SCR 

EQU 

OFFAH 

；SECTOR REG. 

0FFB 


DR 

EQU 

OFFBH 

；DATA REG. 

0FFC 


MSDR 

EQU 

OFFCH 

;MOTOR,SIDE,DRIVE# SELECT 

DF00 

D5 

START : 

PUSH 

DE 

；SAVE DE FOR RETURN STATUS 

DF01 

1A 


LD 

A,(DE) 

；GET COMMAND No. 

DF02 

13 


INC 

DE 


DF03 

D5 


PUSH 

DE 


DF04 

21 DF1A 


LD 

HL,JTA 

；HL=JUMP TABLE AREA 

DF07 

16 00 


LD 

D,0 


DF09 

87 


ADD 

A,A 


DF0A 

5F 


LD 

E,A 

；DE=A* 2 

DF0B 

19 


ADD 

HL.DE 


DF0C 

5E 


LD 

E,(HL) 


DF0D 

23 


INC 

HL 


DF0E 

56 


LD 

D,(HL) 

；GET JUMP ADDRESS 

DF0F 

EB 


EX 

DE,HL 

；HL=JUMP ADDRESS 

DF10 

D1 


POP 

DE 


DF11 

F3 


DI 



DF12 

CD DF19 


CALL 

PATCH 

••CALL (HL) 

DF15 

FB 

* 

El 



DF16 

D1 


POP 

DE 

；GET STRING ADDRESS 

DF17 

12 


LD 

(DE),A 

；STORE LASR STATUS 

DF18 

C9 


RET 


；RETURN TO BASIC 

DF19 

E9 

PATCH : 

JP 

(HL) 

；CALL (HL) 



； 

Jump Table Area 




•TYPE 

I 



DF1A 

DF32 

JTA： 

DW 

RSTR 

；RESTORE 

DF1C 

DF3C 


DW 

SEEK 

；SEKK 

DF1E 

DF55 


DW 

STEP 

: STEP 

DF20 

DF55 


DW 

STPIN 

;STEP IN 

DF22 

DF55 


DW 

STPOT 

;STEP OUT 



•TYPE 

II 



DF24 

DF5F 


DW 

READD 

；READ DATA 

DF26 

DF84 


DW 

WRITD 

；WRITE DATA 


第 8 回 123 


魏 


:出 


る XI 




































































































CD DFEA 
010FF8 
D9 

01OFFB 
2A DFFE 
D9 

IE 00 
16 02 
ED 79 
ED 78 
A2 

C2 DFA4 
ID 

C2 DF98 
18 06 
D9 
7E 


DF84 

DF84 

DF87 

DF8A 

DF8B 

DF8E 

DF91 

DF92 

DF94 

DF96 

DF98 

DF9A 

DF9B 

DF9E 

DF9F 

DFA2 

DFA4 

DFA5 

DFA6 

DFA8 

DFA9 

DFAA 

DFAC 

DFAD 

DFAF 

DFBO 


CD DFEA 
010FF8 
D9 

01OFFB 
2A DFFE 
D9 

ED 79 
CD DFE4 
ED 78 
OF 

30 OB 
OF 

30 F8 




DF7A D9 

DF7B ED 78 

DF7D 77 

DF7E 23 

DF7F D9 

DF80 18 FO 


DF55 

DF55 

DF55 1A 

DF56 010FF8 

DF59 ED 79 

DF5B CD DFD2 

DF5E C9 


DF3C EB 

DF3D 7E 

DF3E 23 

DF3F 56 

DF40 23 

DF41 5E 

DF42 010FF9 

DF45 ED 59 

DF47 01OFFB 

DF4A ED 51 

DF4C 010FF8 

DF4F ED 79 

DF51 CD DFD2 

DF54 C9 


DF32 1A 

DF33 010FF8 

DF36 ED 79 

DF38 CD DFD2 

DF3B C9 


DF30 DFC6 


DF2E DFBC 


DF28 DF5F 
DF2A DF5F 
DF2C DF84 


；TYPE III 



DW 

READI 

；READ ID 


DW 

REDTR 

；READ TRACK 


DW 

WRITR 

；WRITE TRACK 

•TYPE 

IV 




DW 

FORI 

;FORCE INTERRUPT 

； MOTOR 

,SIDE,DRIVE# 



DW 

MSD 

；MOTER,SIDE,DRIVE# 

RSTR： 

LD 

A,(DE) 

；COMMAND 


LD 

BC.CR 

；BC=COMMAND REG. 


OUT 

<C),A 



CALL 

WNBSY 

；WAIT READY 


RET 



SEEK： 

EX 

DE.HL 



LD 

A,(HL) 

；A=COMMAND 


INC 

HL 



LD 

D,(HL) 

；D=TRACK# TO SEEK 


INC 

HL 



LD 

E,(HL) 

；E=CURREND TRACK# 


LD 

BC,TR 



OUT 

(C),E 

；SET CURREND TRACK# 


LD 

BC,DR 



OUT 

(C),D 

；SET TRACK TO SEEK 


LD 

BC.CR 

• 


OUT 

(C) ,A 

；SEND SEEK COMMAND 


CALL 

WNBSY 

；WAIT »NOT BUSY* 


RET 




STEP： 

STPIN： 

STPOT： 


LD 

LD 

OUT 

CALL 

RET 


A,(DE) 
BC，CR 
(C) ,A 
WNBSY 


；GET COMMAND 


READD : 
READI : 
REDTR : 


RED2： 


CALL 

LD 

EXX 

LD 

LD 

EXX 

OUT 

CALL 

IN 

RRCA 

JR 

RRCA 

JR 

EXX 

IN 

LD 

INC 

EXX 

JR 

RLCA 

RET 


SETSCT ；A=COMMAND,SET SECTOR REG. 
BC,CR ；CR=STR 

BC,DR ;BC*=DATA REG. 

HL,(BUFAD) ；HL»=BUFF ADD. 

(C),A ；SET COMMAND 
WAIT1 ；STRANGE ? 

A, (C) ；GET STATUS 
；CHECK BUSY 
NC.RED2 ；END READ 

；CHECK DATA REQUEST 
NC.RED1；NO REQUEST 


A,(C) ；GET DATA 

(HL),A ；STORE DATA 

HL ；INC. BUFF. ADD. 

RED1 ；AGAIN 

；BACK STAT (RRCA <-> RLCA) 


WRITD： 

WRITR： 


CALL 

LD 

EXX 

LD 

LD 

EXX 

LD 

LD 

OUT 

IN 

AND 

JP 

DEC 

JP 

JR 

EXX 

LD 

OUT 

INC 

EXX 

IN 

RRCA 

JR 

RRCA 

JR 

EXX 

LD 


SETSCT ；A=COMMAND,SET SECTOR REG. 
BC,CR ；CR=STR 

BC,DR ；BC» =DATA REG. 

HL,(BUFAD) ;HL*=BUFF ADD. 


E,00H ；COUNTER 

；MASK 

；SET COMMAND 
；FIRST LOOP 


D,02H 

(C),A 


A,(C) 

D 

NZ,FIRST ;FIRST DATA REQ. 

E ；DEC. COUNTER 

NZ,FLOOP ；AGAIN 

WRT1 ；QUIT FIRST LOOP 

A,(HL) ；GET FIRST DATA 

(C),A ；WRITE 1 BYTE 

HL ；INC. BUFF. ADD. 

A,(C) ；GET STATUS 

；CHECK BUSY 
NC.WRT2 ;END WRITE 

；CHECK DATA REQUEST 
NC.WRT1；NO REQUEST 


A,(HL) : GET DATA 





ステップレートは表 2-1 に示してある「時問」 
である。なぜこんなものがあるかというと， 
これは 「 FDD のヘッドを動かす速さ」に機 
種ごとで差があるからなのだ（一般的に高 
い FDD ほど速い）。 FDC は FDD に「ヘッド 
を動かしなさい」という信号を送るのだが， 
その信号は「方向（内側へか外側へか）」 

と「動け」だけなのだ。 FDD は一般にタコ 
だから， FDC のほうでタイミングをとって 
やらないといけない。そのタイミングを指 
定するのが n ， ro なのである。たとえばリ 
スト1のように ri =1 ， ro =0を指定すると， 
FDC は FDD に対して 20 ms (0.02 秒）ごと 
に「動け」と指令を出すことになる。さて， 
実は XI ではステップレートは別に 20 ms で 
なくても良いのである。 

3インチ =3 ms 
turbo の内蔵= 6 ms 

古いタイプ（レバーのないやつ> =20 ms 
となっている。他に XlFmodel 20 内蔵のや 
つと力％いろいろあるが，確認はしていな 
いが，多分それらは 6 ms だと思う。そこで 
リスト2が「ガリガリプログラム」である。 
指定したステップレートで，ひたすらトラ 
ック0〇39間を動くというものである。し 
つこくやったり，性能以上の速度で動かそ 
うとすると故障の原因になるからほどほど 
にやること。性能を越えた場合は “32” と 
か“ 30”（第4ビット=シーク.エラーが1 ) 
などが表示されるはずである。 

あとに残っているのは， STEP 等の 
u = トラックレジスタ更新フラグ 
である。これは「ヘッドの移動に伴って， 
トラックレジスタの値を増減させる力*，さ 
せないか」のフラグである。リスト1で180 
行の & H 5 A を & H 4 A にして， 
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を追加すると “20” と表示されるはずであ 
る。実際には，ヘッドは第21トラック上に 
あるのだが，トラックレジスタはそうなっ 
ていないのである。 

なぜこんなフラグがあるかというと，フ 
ロッ ピーディスクの始祖， IBM フォー マッ 
卜には「欠陥トラック」というものがある 
ためなのだ。たとえば，ディスクをフォーマ 
ットしているときにどうしても正常に書き 
込めないトラックを発見したとする。現在 
の パソコンで はそんな場合には 「エラー だ 
よ，このディスクはダメ」とメッセージを 
124 Oh! MZ 1986.1. 


9 8 B 8 
7 7 O F 


FFF2569CDF 24578 
555666666677777 
FFFFFFFFFFFFFFF 
DDDDDDDDDDDDDDD 




























































EB 

7E 

23 

56 

01OFFA 
ED 51 
F5 

CD DFD2 

FI 

C9 


•MOTOR ON 
'RESTORE 
•SEEK 
*STEP 
•STEP IN 
•STEP OUT 
*READ DATA 

* WRITE DATA 
•READ ADD. 
•READ TRACK 

* WRITE TRACK 
»FORCE INT. 

»MOTOR OFF 


DFF9 

DFFD 

DFFE 


00 00 00 
00 

E000 


リスト 4 


DFB4 

ED 

79 

DFB6 

23 


DFB7 

D9 


DFB8 

18 

FO 

DFBA 

DFBB 

07 

C9 


DFBC 

1A 


DFBD 

01 

0FF8 

DFCO 

ED 

79 

DFC2 

CD 

DFD2 

DFC5 

C9 


DFC6 

1A 


DFC7 

01 

OFFC 

DFCA 

ED 

79 

DFCC 

DFCD 

B7 

FO 


DFCE 

CD 

DFD2 

DFD1 

C9 


DFD2 

C5 


DFD3 

06 

20 

DFD5 

10 

FE 

DFD7 

01 

0FF8 

DFDA 

ED 

78 

DFDC 

4F 


DFDD 

E6 

81 

DFDF 

20 

F6 

DFE1 

79 


DFE2 

Cl 


DFE3 

C9 


DFE4 

3E 

07 

DFE6 

3D 


DFE7 

20 

FD 

DFE9 

C9 



100 CLEAR &HDF00 
110 MEM$(&HDF00,16)=HEXCHR$("D 5 
120 MEM$(&HDF10,16)=HEXCHR$("D1 
130 MEM$(&HDF20,16)=HEXCHR$("55 
140 MEM$(&HDF30,16)=HEXCHR$( M C6 
150 MEM$(&HDF40,16)=HEXCHR$("23 
160 MEM$(&HDF50,16)=HEXCHR$("79 
170 MEM$(&HDF60,16)=HEXCHR$("EA 
180 MEM$(&HDF70,16)=HEXCHR$("E4 
190 MEM$(&HDF80,16)=HEXCHR$("18 
200 MEM$(&HDF90,16)=HEXCHR$("DF 
210 MEM$(&HDFA0,16)=HEXCHR$("98 
220 MEM$(&HDFB0,16)=HEXCHR$("30 
230 MEM$(&HDFC0,16)=HEXCHR$("ED 
240 MEM$(&HDFD0,16)=HEXCHR$("DF 
250 MEM$(&HDFE0,16)=HEXCHR$<"F6 
260 MEM$(&HDFF0,16)=HEXCHR$("OF 
270 DEFUSR0=&HDF00 
280 D$=USR0(CHR$(11,&H81)) 

290 D$=USR0(CHR$(0,&H2)) 

300 D$=USR0(CHR$(1,&H1E,2,0)) 
310 , D$=USR0(CHR$(2,&H3A)) 

320 , D$=USR0(CHR$(3,&H5A)) 

330 , D$=USR0(CHR$(4,&H7A)) 

340 D$=USR0(CHR$(5,&H80 f 1)) 

350 , D$=USR0(CHR$(6,&HA0,1)) 

360 , D$=USR0(CHR$(7,&HC0,1)) 

370 , D$=USR0(CHR$(8,&HE0,1)) 

380 'D$=USR0(CHR$(9,4HF0,1)) 

390 , D$=USR0(CHR$(10,iHD0)) 

400 D$=USR0(CHR$(ll.&Hl)) 

410 END 



OUT 

(C),A 

；WRITE DATA 


INC 

HL 

； INC. BUFF Al 


EXX 




JR 

WRT1 

；AGAIN 

WRT2 ： 

RLCA 

；BACK STAT (RRCA <-> 


RET 



FORI ： 

LD 

A,(DE) 

;GET COMMAND 


LD 

BC,CR 



OUT 

(C),A 



CALL 

WNBSY 



RET 



MSD ： 

LD 

A,(DB) 

；GET DATA 


LD 

BC.MSDR 



OUT 

(C) f A 

；SET IT 


OR 

A 

；MOTOR ON? 


RET 

P 

；MOTOR OFF T1 


CALL 

WNBSY 

；WAIT READY 


RET 



WNBSY ： 

PUSH 

BC 

；SAVE BC 


LD 

B ， 20H 



WNBSYO ： DJNZ 
WNBSY1 : LD 
IN 
LD 
AND 
JR 
LD 
POP 
RET 


WNBSYO 
BC,STR 
A, (C) 
C,A 
81H 


；WAIT 

；DASAI 


；SAVE STATUS 
；CHECK 
NZ,WNBSY1 

A,C ；GET STATUS 

BC ；GET BC 


WAIT1 ： LD 
WAIT2 ： DEC 
JR 
RET 


A,7 
A 

NZ.WAIT2 


；WAIT ROUTINE 


SETSCT ： EX 
LD 
INC 
LD 
LD 
OUT 
PUSH 
CALL 
POP 
RET 


DE,HL 
A,(HL) 
HL 

D,(HL) 
BC,SCR 
(C),D 
AF 

WNBSY 

AF 


； A=COMMAND 

； D=SECTOR# 
;BC=SECTOR REG. 
；SET SECTOR# 

；SAVE COMMAND 

: GET COMMAND 


DB 


DW 

END 


0,0,0,0,0 ；DUMMY 

0E000H ；BUFFER ADDRESS 




出して，別のディスクを使うように要求す 
るのだが， IBM フォーマットでは，「交替用 
トラック」が2トラック分（本当はシリン 
ダと表現すべきだが）用意されていて，多 
少の欠陥のあるデイスクでも使えてしまう 
のである。ごていねいに，その欠陥のある卜 
ラックを指定する方法も決まっている。こ 
の場合に，欠陥のあるトラックを飛ばして 
フォーマットすると，実際のヘッドの位置 
と，ディスクに書かれている 「 IDj に違い 
が出てしまうことになる。そうなると， V フ 
ラグで チェ ックしたときに シーク•エラー 
が出てしまうなどして都合がわるいので， 
u フラグを使って「つじつまを合わせる」 
のである。大昔は磁性体の質が低かったり， 
ディスク（メディア）も高かったりしたか 
ら，そんなことをしたのだろうが，今はほ 
とんど意味がないと言えるフラグである。 

し力、し ， IBM フォーマットがいかに「金科 
玉条 j であるかの良い証拠でもある。 

というところで，少々遊んでみることに 
する。まずはフォーマットされてないまっ 
さらのディスクを用意してほしい。それを 
ドライブ1に入れていただきたい。その状 
態で，リスト1を実行すると，3番目のシ 
ー クコマンドのステータスで，最後に 30 h が 
出るはずである。すなわちシーク•ェラー 
である。これは別にフォーマットされてい 
るディスクでも，ステップ•インで ， u = 0, 
V フラグ =1(& H 4 E ) とすると同じことが 
起きる。トラックレジスタの値は “20” な 
のに， V フラグにしたがってチェックして 
みると，第“21”トラックだった，というわ 
けである。 

TYPE I コマンドで 言い残したのは ， ST 
EP コマンド だけである。この コマンドを 実 
行すると，へッドは内/外どっちに動くのか 
ということである力 ? ，「直前に動いたほう」 
に動くということである。すなわち ， FDC 
は「最後に動いた方向」を保持していると 
いうわけである。 

TYPEII の実習 

TYPE I では機械語を使う必要がなかっ 
たが ， TYPE II ではさすがにそうはいかな 
い〇そこで，リスト3とリスト4である0 
例によってリスト3は機械語プログラムの 
アセンブルリスト，リスト4はそれを BAS 
1 C から使うためのプログラムである 0 BA 



ABCDE1 3478 
EEEEEFFFFF 
FFFFFFFFFF 
DDDDDDDDDD 


BFF6DDD9E2FF20A0 

EDD5ECCDFCOOD2FE 

65C3F993ADB8D110 
55B 2 OC 72210 FC 800 


EC4B1 298 
538EODD7 


B4FA7F30 
FAOIB 420 


-FDDAEOEEEO 

79F2FDA8F 890 FF 90 
8EDD0E2F07DF00C0 

09FDBFF08D38C8D9 
OC5CF003FE 21 FFFC 


ABFFDA 9 OA2E 99072 
1FD0E1D3E077C10D 

1FF8F9FFD69DFOED 

2D5FOCOOC1DED23C 

59F19F 88906 E2695 
D1D0FDF7C007D0CF 

3D5A1 21 D7E89D 511 
1C 510 D0E011DCCC5 


> D 5 c D DFD C 


































































SIC は CZ -8 FB 01 のバージョン1でなけれ 
ばならない。なぜかと言うと，場合によっ 
ては E 00 Oh 〜 F 800 h ぐらいまでをワークエ 
リアに使ってしまうからである。 

まずリスト4の使い方からである。 

基本的なパターンは， 

番号 (0 〜11>， コマンド， パラメータ… 
を CHR $ で文字列に変換して USR 0 (〜）で 
ある。それは表5に詳しく示す。11番だけ 
は FDC への コマンドで はなく， FFCh 番地 
への データであることに注意。 

なお，このプログラムは手抜きのお手本 
みたいなもので，ちゃんとしたエラー処理 
をしていない。たとえばディスクを抜いて 
あるドライブのモーターを ON にしようと 
すると， 帰って来ない のである。そのとき 
は心静かにリセットスイッチを押していた 
だきたい。 

では，おもむろにリスト3の解説を始め 
る。 

DFOOh 〜 DF 19 h は，〇〜11番のうちのど 
こへ飛び込むかを計算している。最初に DE 
レジスタを PUSH しているのは，のちのち 
ステータスを返すためである。 DFIIh に 「D 
I 」があって割り込みを禁止しているが，こ 
れはディスクリード/ライトのようにタイミ 
ングが大事なプログラムでは必要なことで 
ある。 DF 12 h では DF 19 h の 「JP ( HL )」 と 
ともに ， 「CALL ( HL )」 に相当することを 
やらせている。実際のルーチンは後回しに 
して， DF 15 h 〜 DF 18 h を説明する。ディス 
クにアクセスして帰って来たときに， A レ 
ジスタは最後に読み出したステータスレジ 
スタの値を持っているようにしてある。そ 
の値を DE の指すアドレスにストアすると， 
このプログラムで呼び出した BASIC で， 

D $ = USR 0 (〜） 

となっていると， D $ の先頭の文字として受 
け取ることができる。便利，便利。 

では，実行ルーチンのほうであるが，た 
とえば DF 32 h の RESTORE の実行ルーチン 
では ， 「LD A ，（ DE 〉」 によって， FDC に 
送る コマンドを A レジスタ に拾い上げてい 
る 0 それをコマンドレジスタ （ CR ) に OUT 
して， WNBSY を コールす る。よ 一す るに 
これは前述の BASIC と同じである。 SEEK ， 
STEP 等も同様。 

次に DF 5 Fh 力 1 らの READD (リードテ、、一 
夕 ）， READI (リードアドレス ）， REDTR 

126 Oi! MZ 1986.1. 



(リードトラック） 

の 3種混合 ルー チ 
ンである。恐ろし 
いことにこれら 3 つ 
の ルーチンは 完全 
に同じなのである。 

その結果 ， READ 
I ， REDTR では， 

セクタ番号を指定 
する必要がないの 
にネ旨定している。 

実害はないから， 

大丈夫。まず 「 CALLSETSCT 」 で A に 最後に読み込んだステータスレジスタの値 

コマンドを捨いあげ，なおかつセクタレジ が入っているから， 


表 5 (リスト4の使い方) 


コマンド 

番号 

第2パラメータ 

第3パラメータ 

第4パラメータ 

リストァ 

0 

コマンド 

— 

— 

シーク 

1 

// 

目的シリング No . 

現在のシリンダ No . 

ステップ 

2 

// 

— 


ステップ•イン 

3 

// 

- 


ステップ.アウト 

4 

// 

- 

— 

リードデータ 

5 

// 

セクタ No . 


ライトデータ 

6 

// 

セクタ Na 

- 

リードアドレス 

7 

// 

ダミー 

一 

リードトラック 

8 

// 

ダミー 

— 

ライトトラック 

9 

// 

ダミー 

- 

フオースインタラプト 

10 

// 



モーター，サイド， 
ドライブナンパー 

II 

データ 

. - 

- ■ 


スタ （ SCR ) にセクタ番号を OUT している。 
その先が少々複雑なのだが， BC レジスタに 
ステータスレジスタ （STR = CR ) のアド 
レスをセットし， EXX で裏レジスタにして， 
BC ’ にデータレジスタ （ DR )， HL ， に バッフ 
ア アドレスをセットしている0ディスクの 
リードライトのためには，2つの違う I/O 
アドレスに高速にアクセスしなければなら 
ないのでこうしたのだが， STR と DR の上 
位アドレスはともに 0 F H だから，どうして 
も裏レジスタを使わなければならないわけ 
ではない。結局は趣味の問題である。その 
あとはコマンドを CR に OUT して，少々待 
つ。なぜかよく知らない力す，とにかく待つ。 
それからはレジスタを表にしたり裏にした 
りしつつ，データを受け取るのである 。 DF 
82 h 番地の RLCA は右にローテートしたス 
テータスを左にローテートして元に戻すも 
のである。 

次に DF 84 h からの書き込むほうであるが， 
DF 98 h 〜 DFA 9 h 間は，1バイトだけ書くル 
ーチンである。なんでこんなことをしてい 
るかというと，ライトトラックのためなの 
だ。なぜかこうしないとライトトラックカ 5 ' 
成功しないのである。理由はよくわからな 
いが動けば良いのだ。他は基本的にリード 
ルーチンと同じである0 

さて，リスト4を実行すると，ドライブ 
1に対してリストア動作したのち （290 行）， 
第2トラックへシークし （300 行)，第1セ 
クタをリードし （340 行），モーターを OFF 
する。データを読み込む番地は， DFFEh 番 
地からの2バイトに格納されているアドレ 
スで，リスト4では E 000 h 番地になってい 
る （260 行の右端)。の先頭バイトには， 


PRINT ASC ( D $) 

で，エラーチェックもできるようになって 
いる。そこでさっそくリードデータのかわ 
りに，370行のリードトラックを実行してみ 
ていただきたい。 「 D $ = 〜」のかわりに， 
「 D 1$ = 〜 j とでもしておくべきだろう。 

実 fi 1 後 ， PRINT ASC ( D 1$) とすると，“4” 
が表示されるはずである。 ステータス 表を 
見ると，なんと 「LOST DATA 」 である。 
これは結局ど一ゆ一ことかと言うと「さっ 
さと読み出さなかったから，データの取り 
こぼしがあるよ」ということである。つま 
りはエラーである。 

話せばわかる！ XI では，ど一してもこ 
うなるのである。これはしかたないのであ 
る。私のプログラムのせいではないのであ 
る。しかし，ここにも一筋の光明があるの 
だ oXlturbo の内蔵ディスクならば ， 「LOST 
DATA 」 にはなるが，十分にデータは読み 
出せているのである（来月やるのだ)。他の 
ディスクについては，3インチと 800 F 等の 
旧タイプでは，データがビットずれを起こ 
してしまって使いものにならないことを確 
認済みである。 CZ -501 F や X 1 F の内蔵ドラ 
イブは，申しわけないが確認していない。 

しかし，リードトラックよりも大事なこ 
とがあるのだ（と逃げる）。まずは TYPEII 
コマンドのフラグに ついて 説明しておく。 

• m = マルチレコード フラグ 

これは，複数のレコードをいっぺんに読 
み書きするときに使うフラグである。あと 
で実験する。 

• S = サイドフラグ 

これは C フラグといっしよに使うもので， 
読み出したディスタのサイドが0であるべ 

























































































































D$=USRO(CHR$(11,&H81 )Y : , MOTOR ON 

D0$=USR0(CHR$(0,&H2)) : * RESTORE 

D5$=USR0(CHR$(5,&H8A f 1)) : , READ DATA 

, D6$=USR0(CHR$(6,&HA0,1)) : * WRITE DATA 

D$=USRO(CHR$(11,&H1)) : 1 MOTOR OFF 

PRINTASC(DO$),ASC(D5$),ASC(D6$) 

END 


4 16 0 


S,C FLAG.•.S=1,C=1 


m FLAG 

: , MOTOR ON 
: »RESTORE 
: , READ DATA 
: »WRITE DATA 
: , MOTOR OFF 
325 PRINTASC(D0$),ASC(D5$),ASC(D6$) 

330 END 

4 16 0 


280 D$=USR0(CHR$(11,&H81)) 
290 D0$=USR0(CHR$(0,&H2)) 

300 D5$=USR0(CHR$(5,&H90,1)) 
310 , D6$=USR0(CHR$(6,&HA0,1)) 
320 D$=USR0(CHR$(11,&H1)) 


図 2-2 


s,c 

FLAG...S=0 , C= 1 



280 

D$=USR0(CHR$(11,&H81)) : 

， MOTOR 

ON 

290 

D0$=USR0(CHR$(0,&H2)) : 

， RESTORE 

300 

D5$=USR0(CHR$(5,&H82,1)) : 

，READ DATA 

310 

* D6 $ =USRO ( CHR$ ( 6,&HAO,1 ) ) : 

» WRITE 

DATA 

320 

D$=USR0(CHR$(11,&H1)) : 

， MOTOR 

OFF 

325 

PRINTASC(DO$),ASC(D5$),ASC(D6$) 



330 

END 



4 

0 0 




図 2 4 


aO FLAG 



280 

D$=USR0(CHR$(11,&H81)) : 

， MOTOR 

ON 

290 

D0$=USR0(CHR$(0,&H2)) : 

， RESTORE 

300 

D6$=USR0(CHR$(6,&HA1,1)) : 

， WRITE 

DATA 

310 

D5$=USR0(CHR$(5,&H80,1)) : 

，READ DATA 

320 

D$=USRO(CHR$(11,&H1)) : 

， MOTOR 

OFF 

325 

PRINTASC(DO$),ASC(D5$),ASC(D6$) 



330 

END 



4 

32 0 
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き力％それとも1であるべきかを指定する。 

• E = デイレイフラグ 

これは，ヘッドがディスクに押しつけら 
れたかどうかの信号のサンプリングタイミ 
ングを指定するもの0 XI では意味がない 0 

• C = サイド番号比較フラグ 

これは V フラグがトラック（シリンダ） 
番号を比較するかどうかのフラグであるの 
に対して，サイド番号を比較するかどう 
かのフラグである。 しつこい ようだ 力す， S 
フラグと いっしよ に使う。 

• ao =アド レスマーク フラグ 

これはライトデータのときにだけ指定で 
きるものである。これはサンプルを示した 
ほうが理解しやすいだろう。 

では， TYPEII の実習である。図2であ 
る。 

まずは m フラグをいじってみる。リスト 
4の280行から図21のように書き換えてい 
ただきたい。まずは280行でモータオン，ド 
ライブは“1:”でサイドは〇番である。 
リストアして， m = l で第1セク•夕から読み 
始めている。325行で，それぞれのステ ータ 
スレジスタを 表示している。その値は， 
リストア命令->4 (TRACK 00-1) 

リードデータ命令->16 (RECORD 

NOT FOUND ) 
となっている。モニタに飛んでダンプして 

図21 


みると，しっかり16セクタ分が読み込まれ 
ているはずである。そこで， BASIC に返り， 
PRINT INP (& HFFA ) 

として，セクタレジスタを表示してみると 
“17” と出るはずである。すなわち FDC は 
m フラグ=1に従って，第1セクタから第 
16セクタまでを読み，あげくの果てに第 
17セクタまで読もうとしたが「無い袖は振 
れない」の法則に従って，当然のごとく失 
敗して ， 「RECORD NOT FOUND 」 を起 
こしたというわけである。この m フラグを 
使うと，連続セクタを読むという点ではな 
かなかに高速なのだが，おしむらくは 「いつ 
終わるのかを指定できない」という欠点が 
あるのだ。それで FDC は「第17セクタはど 
こだっ！？」と，少しの間捜し回るので結局 
は時間を食ってしまう。よって正しく使う 
には，必要なだけを読んだかどうかをチェ 
ック してやって， TYPEIV のフオースイン 
タラブトを使って，コマンドを打ち切って 
やらなければならない。なかなかに世話の 
やける m フラグであった。合掌。 

次に S ， C フラグである。図 2-2 は，平和 
な例で，280行でサイド0を指定しているか 
ら， S =0 (サイドは0ですか ？）， C =1( チ 
ェックしてください）によって，ステータ 
スは〇という値になる。この逆が図 2-3 で， 
280行でサイド0を指定しているのに ， S = 

図 2-3 


1(サイドは1ですか？）， C =1 (チェック 
してください）としているので，しっかり 
16 = RECORD NOT FOUND 力す出ている 0 
この場合はデータの読み込みは行われない。 

ao フラグの実習が図 2-4 である。 ao フラグ 
尸1で，ライトデータを実行すると，そのセ 
クタにデリー テッ ドアドレスマークが書か 
れてしまうのだ。具体的にどこかというの 
は来月やるのである。これを検出するには， 
そのセクタを読むだけで良い。図 2-4 のよう 
に，ステータスレジスタが32となり，第5 
ビット （RECORD TYPE ) が'1になる0 
この場合にデータはちゃんと読まれるから， 
特にチェックしないかぎり同じことである。 
では，なぜこのようになっているかという 
と，例によって 「 IBM に聞いてくれ」なの 
であった。『 X 1マシン語活用百科』（産業報 
知センター）には，これを「プロテクトに使 
える」と書いてあって，なるほどと思うが， 
実社会におけるプロテクト事情は，さらに 
生き馬の目をくり抜くようである。 

以上で今月はひとまず終わりである。来 
月は，ありとあらゆる変質的な FD 操作術 
へと食指を伸ばす予定である。最後になっ 
たが今月（と来月）の本文に対して，その 
筋の牛嶋氏から貴重な助言をいただいた。 
とりあえずここに感謝のポーズ。ではまた 
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その筋質問箱 


我解答者祝一平。今月唯一行。特急解答！ 


挑戦状最近 S - OS のアプリケーシヨ 
ンが増えてたいへんうれしいのです 
が，どうもあの長ったらしいダンプリスト 
を入力するのがめんどくさく感じます。そ 
こで僕は考えました。あの，縦横チェック 
サムを入力するだけで，加勺にダンプリ 
ストを出力することはできないだろうかと。 
もし，できるのでしたら，少々スピードが 
遅くても，ぜひ作ってください。この挑戦 
は，あなたをその筋の人と兒込んでの1犯戕 
です。 三重県楠見武士 

A ふむふむ。なかなかにその筋の発想 
^であるが，もう少し修業が足りない 
よ一 1 T ある 。 Oh ! MZ のチェックサムは， 

縦16バイト，横8バイト=128バイトに，24 
個のサムをつけたものである。ネライは， 
この24バイトを打ち込むだけで，128バイト 
を「作る」ということである。しかし，残 
念ながら「世の中はそんなに U * くないの法 
貝 IJ 」 により，その手のことはできないので 
ある。わかりやすく言うなら，たとえば32 
K バイト= 32768バイトのプログラムを考- 
えてみる。 128バイトを24バイトで「作り出 
せる」なら，24/128=3/16の手間ですむと 
いうことである。よって， 32K バイトのプ 
ログラムは，32768X 3/16=6144バイトを 
打ち込むだ'けですんでしまう。しかしそ一 
なると， さらにその6144バイトは 6144X 
3/16 =1152バイトを打ち込むだけで「作り出 
せる」じやないか。さらにはどど一つと， 
1152->216 = 128+88->24+88 = 112 


となり，結局は112バイトを打ち込むだけ 
で，人枚 32 K バイトのプログラムが「でき 
て」しまうのであった。ど一た；いかにも 
あり得ないよ一な気がしてきたであろう。 

Oh に述べたことをムズカシく言うと， 
「情報理論」という学問になるのである。 
_ものだから，ちよいとさわりた'け蜜••く 
と，「情報（データ）にはエントロピーつうも 
んがあって，これはランダムさ（規則性の 
逆）を表す0それは計算できる」，「情報(デ 
ータ）に規則性があればあるほど圧縮する 
ことが:できる」などなどとなっている。ざ 
っと計算してみたところ，機械語プログラ 
ムは，せいぜい10%ぐらいしか圧縮 1 できな 
いようである。これは1回だけの圧縮で， 
90%—81%—•••とはいかない。それが人生 
である0次の方ど一ぞ。 


祝先生こんにちは。僕はビリー•ジ 
^ョエルが好きです。僕たちその筋… 
歩手前の人間たちの重要問題である“コピ 
一”と力，“だびんぐ”力すよくこのコーナー 
で取り上げられていますが，メディアを純 
粋にアナログ信号として取り出せば，いか 
なる“ぶろてくと”も3秒* r 死ぬのではな 
いのでしようか？リクエスト曲はオンリ 
ーヒューマンをお願いします。祝先生さよ 
うなら。 愛知県中野智之 

▲ 中川智哉氏が横で「グラスハウスは 
q 良いが，オネスティはイマイチだ」 
などとうるさいので\リクエストはしない 
よ一に。 


おっと，解答を忘れるところであった。 

え一と，アナログ信号としてコピーすれば 
良ぃのではなぃかとぃうことだが，そ一は 
ぃかなぃのだ。なぜならアナログ信号とぃ 
うものは「劣化 j するからなのだ。すなわ 
ちテープに記録されてぃる信せは，- TL な 
のだが ，これをアナログ的にコピーしよう 
とすると _ A _ になってしまうのである（正 
確に言うともう少し違うけど，信号が“丸 
く”なってしまうとぃう基本は同じ）。そこ 
でもうひとつひねると，「波形整形」とぃう 
テクニックが出てくる。すなわち， _Tl 
になってしまった信号を，電気回路を使っ 
て _ n _ に戻すのである。しかし，その方法 
とて完全無欠とはぃかなぃよ一で，最近の 
プロテクト技術はほとんど魔術に等しくな 
ってぃる気配である。ま，とにかく近年で 
はアナログコピーなるワザ は， ヘッド ロッ 
クと同程度の効果しかなぃと兄て問違ぃな 
ぃ。次の方ど一ぞ。 

一平さん，助けてくださぃ。僕はこ 
^の間まで X 1 C でせっせとミュージッ 
ク • データを作り続けてきました。先 F 1 ，めで 
たく愛機を XI turbo に買ぃ換えたので，デ 
ータをデ'イスクに転したのですが，次の 
ような恐ろい、事態が発生してしまぃました。 
從米の BASIC(CZ 8 CB 01) では，たとえば 
10 SOUND 11,10 0 ：SOUND 12，100: 
SUOND 13,0 

20 PLAY “ V 16 C 9: V 12 E 7 G ” 

とやると，チヤンネル A のエンべ ローフ。 が 
ちょん切れてしまぃます力 ? ， 

20, PLAY “ V 16 C 9: V 12 E 7 R ” 

ではちよん切れませんでした。 


ところが turbo BASIC では後者もちよん 
切れてしまうのです。おかげて'歯切れのよ 
いベースラインをつけた曲などでは，エン 
ベロープをかけた主旋律のリズムがムチヤ 
クチャになってしまいます。 

なんで，從米の BASIC と turbo BASIC で 
PLAY 文の反応が違うのですか？ turbo 
BASIC で，エンベロープがちよん切れない 
ようにするにはどうしたらいいですか？ 
なお， CZ 8 FB 01 ではうまくいくのです 
力?， フリーエリアが足りなくて，どうして 
も turboBASIC で走らせたいのですが……。 

北海道大概尚己 
A おおっ！まさし〈そのとおりの症状 
^である0質問では「エンベロープが 
ちよん切れる」と表現している力 ? ， IBt に 
言うと， 8 CB 01 では「20」だとチャンネル 

A のエンべローフ。が' 

—— （2 山） 

となり，「20」では 

r\ _ — ( 1 in) 

となる力?， turbo BASIC では，どちらも2 
山になってしまうということなのである。 
BASIC を解析したわけではないが ， fSil 太 I は， 
turbo BASIC では，「20'」のとき「ルのと 
きも， PSG の13番レジスタ（エンベロープ 
パターンす斤定）にデータを再設定するため 
らしい。’85年11月号にも書いたように，13 
番レジスタに書き込まれると，エンべロー 
フ°が再?£して， 2山 F 1 がびよこんと出てし 
まうのだ0しかし， BASIC のマニュアルに 
は， 「 V 0 〜15」となっているので， V 16 は 
たまたまエンベロープモードになるというだ 
けの，いわは 11、し命令であるから，文句は 
言えないよ一である。 

さて対策であるが，私が思いついたのは 
残念ながら 「“ R ” を書かない」ということ 
だけである。海かなければチヤンネル A を 
すべて演奏し終えるまでは，他のチャンネ 
ルは “ R ” を実行しているのと同じことにな 
るので，それを使って切り抜けるのである。 
FLAY 文を分割するなどであれこれいじれ 
ば，多分どうにかなると思う。しかし，私 
が勧めるのは，ミュージックエディタ（で 
きれは％譜も表示できるやつ）を ， mmn 
で自作することである。 と誘惑する私 

であった。月こっちのその筋はあ一まいぞ。 
で’きたら投稿してい t こだきたい。 

というところで’，今 h はこれまでである。 
どこからて'も，かかってきなさい！ 
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GAME OF THE YEAR 


いつだって面白いゲームが必要だ 。 Oh ! MZ は独自の立場から GAME OF THE YEAR 
を選出することにした0今月は，作品賞ほか各賞のノミネート作品を発表，読者諸君の審 
査を待つ。そして来たる3月号において記念すべき初代 GAME OF THE YEAR が誕生す 
るのだ0さあ，君もゲーム史上に残る この一 大イベントに参加しよう。 


THE SOFTOUCH SPECIAL ノミネート決定 


Oh ! CZ 賞 

ポコスカウオーズ 
ゼビウス 
ザナドゥ 

ハイドライド 

ハイパーオリンピック’ 84 

アミューズメント.アクション部門賞 

ヴォルガード 

ロー ドランナー 

テグザー 

ザ • キャッスル 

キングフラッピー 

スポーツゲーム部門赏 

ビクトリアスナイン 

野球狂 

ホールインワン 
F 2 グランプリ 
ハイパーオリンピック’ 84[j] 

SF& ファンタジー部門賞 

ハイドライド 
ラグランジュ L 2 
ザナドウ 

ザ.ブラックオニキス 
フアンタジアン 
思考型ゲーム部門賞 
棋太平 

森田和郎のオセロ 
フラッピー 
口ードランナー 
モール • モール 
特別企画賞 
ブラステイー 
新竹取物語 
ウイングマン 

超時空要塞マクロスカウントダウン 
サンダーストーム 
移植ビデオゲーム賞 
ゼビウス 
ドルアーガの塔 
ハイパーオリンピック’ 84 
ギャラガ 
マッピー 

移植外国ゲーム 赏 
ウィザードリィ 
ロー ドランナー 
インポッシブルミッシヨン 
アズテック X 


Oh !MZ はついに 

やってしまうんだゾと。 

GAME OF THE YEAR はいうまでもなくその年 
を代表する優れたゲームソフトを選ぶもので，パソ 
コンゲーム大賞ともいうべきものだ。それは，もっ 
とも面白いゲームであり，もっともパソコンゲーム 
の発展に貢献したソフトである。このオシャレなソ 
フトを選ぶため ， Oh ! MZ ではお馴染みの清水和人 
氏を始めとする GAME OF THE YEAR 決定実行委 
員会を結成し，公正かっユニークな選出方法を設定 
した。まず，対象となる作品は，この丨年間に話題 
になったすべてのパソコンゲームソフトとし，発売 
時期はあえて問題にしない。もちろん，実際に選出 


するのは Oh ! MZ を読んでいるゲームフアンに限ら 
れるため，ピンポールしか知らない98オジサンの票 
が集まる心配もない。そして，公正といえば，アカ 
デミー賞のように配給映画会社の力関係がどうとか， 
レコード大賞のように所属事務所がどうたらこうた 
らといった問題が存在しない。スクウェアのパーテ 
ィではローストビーフが美味しかったとか，アスキ 
一宣伝部の K 嬢は声がかわいいとかいった政治的背 
景もない。あるのは読者丨人ひとりの正義の目であ 
るといえるだろう。 

それでは ， GAME OF THE YEAR 各賞の内容と 
具体的な選出方法を見て，ぜひとも君の情熱の丨票 
を投票しよう。はたして時代が求めているのはどの 
ゲームか？ 


作品賞 

ウイングマン 
ヴォルガード 
EXOAII ウォーロイド 
F 2グランプリ 
キングフラッピー 
サラダの国のトマト姫 
サンダーフォース 
ザ，キャッスル 
ザナドゥ 

ザ • ブラックオニキス 
ジャン狂 
ゼビウス 
タイムトンネル 
大脱走 

ちゃつくんぽつぶ 

超時空要塞マクロスカウントダウン 
テグザー 
デゼニランド 
デゼニワールド 
デーモンクリスタル 
TOKYO ナンノ、。ストリート 
ドラゴンスレイヤー 
ドルアーガの塔 
ハイドライド 
ハイパーオリンピック’84 
フアンタジアン 
フラッピー 
プラズマライン 
ポコスカウォーズ 
ミステリーハウス WORRY 
野球狂 

ラグランジュ L 2 
口ードランナー 
オリジナルシナリオ賞 
サザンクロス 
TOKYO ナンノ\°ストリート 
タイムトンネル 


ラグランジュ L 2 
暗黒城 

特殊効果貧（サウンド&グラフィック） 
テグザー 
ラグランジュ L 2 
ハイドライド 

ザナドゥ 
プラズマライン 
テーマ音楽賞 
テグザー 
タイムトンネル 
ボコスカウォーズ 
新竹取物語 
ギャラガ 

美術デザイン（キャラクター， 背景） 
妖怪探偵ちまちま 
テグザー 

ハィドラィド 
ファンタジアン 
レリクス 

主演キャラクター賞 
フラッピー 
テグザー 

ちやつくん（ちやつくんぽつぶ） 
ラファエル王子（ザ.キャッスル） 

妖怪探偵ちまちま 
助演キャラクター 賞 
エビーラ（フラッピー） 

MELEON (ラプテック） 

ミクちやん（ウイングマン） 

アンドアジュネシス（ゼビウス） 

クラーケン（ザ•ブラックオニキス） 

Oh ! [賞 

ちやつくんぽつぷ 
ドルアーガの塔 
F 2グランプリ 
タイムトンネル 
プラズマライン 
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年闉 ゲーム ソフト 

BEST 30 

1 . フアンタジアン 

2. ハイドライド 

3. ザ • ブラックオニキス 

4. テグザー 

5 . ロードランナー 

6. 野球狂 

7. 超時空要塞マクロスカウントダウン 

8. ゼビウス 

9. F 2グランプリ 

10. ザナドゥ 

11 . デーモンクリスタル 

12. プラズマライン 

13. タイムトンネル 

14. ザ•キャッスル 

15. ちゃつくんぼつぶ 

16. フラッピー 

17. デゼニワールド 

18. 大脱走 

19. サンダーフォース 

20. EXOAII ウォーロイド 

21. ハイパーオリンピック，84 

22. ドラゴンスレイヤー 

23. ミステリー ハウス WORRY 

24. ラグランジュ L 2 

25. ウイングマン 

26. ヴォルガード 

27 . サラダの国のトマト姫 

28. ジャン狂 

29. ド ルアー ガの塔 

30. デゼニランド 

赛査霣ノ5ネート 
BEST 10 

I .ザ.ブラックオニキス 

2. ハイドライド 

3. テグザー 

4. フアンタジアン 

5. ザナドゥ 

6. ゼビウス 

7. ボコスカウォーズ 
8 . ザ•キャッスル 

9. TOKYO ナンノくストリート 

10. キングフラッピー 


年間 ゲーム ソフト 
BEST 30 決まる 

年間ゲームソフト BEST 30 は，愛読者カードの， 
「推薦するパッケージソフト j の集計によるもので， 

I 月号から12月号までの愛読者カードから各月500 
通ずつ任意に抽出して集計を行った。結果はご覧の 
とおりである。第 I 位は，6月号ごろから異常な勢い 
で票を伸ばしたファンタジァンだ。また，予想どおり 
の強さを見せたハイドライドや，丨年を通して安定 
した人気を保ったザ•ブラックオニキスなどが2位， 
3位につけている。いわゆる赤丸上昇中なのがテグ 
ザーとザナドゥである。テグザーは9月号，ザナドゥ 
は丨丨月号あたりからの追い上げでここまで来たのだ。 

そのほか，スタンダードナンパーともいえるロー 


卜」である。まず，これをもとに集計した「年間ゲ 
ームソフト BEST 30 j と GAME OF THE YEAR 決 
定実行委員会による「審査員ノミネート BEST 10」 

を発表することにした。 

さて，実際のノミネートに関しては，読者の選ん 
だ BEST 30 に加えて，審査員ノミネート BEST 10が 
加算され，その結果33本のゲームソフトが作品賞に 
ノミネートされたわけである。 

さあ，この33作品の中から GAME OF THE YEA 
R を選ぶのは読者自身にゆだねられる。ぜひとも， 

これはと思う作品を選んで投票してほしい。 

また，その他の各賞に対しては GAME OF THE 
YEAR 決定実行委員会によるノミネートがなされた。 
ただし，ここにノミネートされなかったソフトへの 
乱入投票も認めることにする。 


ドランナーや JOY JOY PACK にも採用された野球 
狂，そしてレーシングゲームの雄 F 2グランプリな 
ども BESTI 0 内に入っている。 

ノ5ネートの方法 

GAME OF THE YEAR 最大の関心はなんといっ 


決戦投票の方法 

ハガキに投票したい賞と作品名（何部門でもよい） 
を記入して下記の宛先へ送ってほしい。年賀ハガキ 
や暑中見舞の余ったやつでかまわないが，愛読者力 
ードは集計されないので注意してほしい。 


ても「作品賞はどのソフトが獲得するか j だろう。 〒102東京都千代田区四番町2 — I 

この作品賞選出のベースになっているのは，毎月愛 ㈱ 日本ソフトバンク 

読者力ードで寄せられる「推薦するパッケージソフ Oh ! MZ ゲーム係 丨月丨5日消印有効 
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GAME OF THE YEAR ， 果たして作品賞は !? 


■どんな かたちにせよ， No. 丨のゲームを決めると 
いうのはワクワクしますね。もちろん読者投票で 
人気ソフトを選ぶというのはめずらしいことじゃ 
ないけど，ノミネート方式を採用したのはこれが 
初めてじゃないかな。できるだけ多くのソフトに 
チャンスをということで33本のソフトがノミネー 
卜されたわけだけど，ぼくら審査員のノミネート 
がそれほど影響するとは思えないし，読者が選ん 
だ BEST 30から予想すると上位4作品ぐらいの激 
戦になるんじゃないかと思ったりもする。あれほ 
どの盛り上がりを見せたファンタジアンがそう簡 
単に丨位の座を明け渡すとは思えない。そうか 
といって MZ - 2000/2200/2500版の登場でハイド 
ライドの逆転も考えられる。ザ•ブラックオニキ 
スはザ • ファイヤークリスタルの登場がどこまで 
再燃に影響するかだろう。一方， RPG だらけの今 

I 年のソフトの中でテグザーの活躍は実に気持ちが 
よかったと思う。追い上げが面白くなりそうだ。 
さて，ぼく個人としてはザナドウを BEST 3にし 
ているんだけど，時期的にみると難しいところか 
もしれない。むしろ来年にチャンスがあるという 
ほうがいいかもしれないね。それとウィザードリ 
ィがノミネートされなかったのは不思議といえば 
不思議だ。なんとなくみんなも，いまさらウィザ 
ードリィを推薦してもどうか…って気持ちがある 
のかも。これも来年には真価が問われることにな 
るだろう。もっとも日本のゲームもいつまでもウ 
ィザードリィを目標にしていては困るけどね。 

(斎藤晋） 

■ I 年というのは短かいもんだ，もしくは，ゲー 
ムの流れは速いもんだ的発想の私でいくと，この 
ゲームあのゲーム，それはそれなりにうわあ懐し 
いななんて考える。僕にとってそういう想い出の 
ゲーム v.s. 今燃え上がるゲームを同じ土俵の上で 
冷静かつ過激に順位づけをするというのは簡単に 
いうと極度に刺激的だ。だから，いったいどれが 
I 位になるかなんてこ^;あわからんが,こりゃ入 
らないなんてのはありたさん。ねらいわいいのに 
なんかいまいちってやつあだめだね。$なくとも， 
たくさん売れたってより，なんかこう i っとうお 
一って感じで皆が殺到したのがきっと丨位だよ。 
でもこれだけのゲームの中で I 位になるっていや 
あすげえ。そんかわり「うつそ一，あたし信じら 


んなあい」って人もいるってとこかな。オレはこ 
こんとこ RPG にハマってるから，その辺を上位に 
押してみたジャン。ほかの人と違うのはナンパと 
リザードだろう。オラなんてったってこういうの 
が好きだべ。ブレイしてるとなんかこう体さカー 
ッと燃えてきてよう， SPELL と BITE と ATTACK 
さいっぺんにくらったときみてえにしびれちまっ 
たあ。だけどちきしょう，なんであのゲームがあ 
んなに低くて，よりによってこんなのか二 h のほう 
にいるんだろう。だんだんハラがたってきたぞ。 
よし，僕も年賀状の残りで投票しようっと。それ 
から日本語は正しく使いましょう。じやんじやん。 

(清水和人） 

■僕は B 型で気の長いほうではない。そういうわけ 
だから，選ぶゲームも読者の皆さんとは大違いに 
なるはず。そうです。他人のことなど考えられず 
に大切な花畑を平気で踏み荒らして，ひんしゅく 
を買う B 型，ですからテグザーなんかは大嫌い。 
でも，みんなはテグザーが好きだ。う〜む。ギャ 
ップに苦しんでしまう。どちらかというと，口一 
ルプレイよりもアドベンチャーが好きだな。今は 
まだ，言葉探しの状態であるわけだけども，スト 
ーリマを楽しむことができるアドベンチャーは僕 
にとってシューテイングゲームの次に好きなジャ 
ンルです。そういうことでは，今年はロールブレ 
イの嵐が吹きまくって僕は悲しかった。ただ，ハ 
イドライドは唯一，暗いと言われてきたロールプ 
レイに新風を巻き起こしたゲームだと言えるだろ 
う。私は喜んだです。夢のかたまりであるバソコ 
ンには，夢のあるゲームがなくてはいけないのダ。 
ちなみに，順位の予想は B 型の僕には聞かないよ 
一に。僕は，ギャラガやマッピーが大好きなのダ。 

(斎藤亮） 

■いきなり GAME OF THE YEAR なんつうもん 
がおっぱじまってしまった。聞くところによると 
良い ゲームを 選び出して ひょ一 しょ一してしまう 
というわけで，あんまり良くわかんないけど，な 
にかの間違いで日本の バソコン ゲーム界の進歩に 
貢献するかもしれないので，とりあえず私も審査 
員になったしだいである。 

私ははっきし言って，賞というものをあんまし 
「良いもの」とは思っていない人なのである。ど一 
してかっ つ一と 「賞」というと日本の TV 界が乱発 


している 「輝け！あ 一たら こ 一たら へまらか大 
賞！」 とか，史上最強のパロディともいえる「日 
本 アカデミー賞」 などを思い浮かべてしまうので 
ある。 HONDA が 常に 最高のものに挑戦しているの 
とは大 違いで， 日本ではとりあえず「手の届く賞 
を作ってしまうもんね一」なのである。 

だから 何を い 一たいんで一というと，私は良い 
審査員にはな れっこな いという ことなのである。 
つまり悪徳レフェリーになってしまうのである。 
ど一だす ごいだ ろうと言いつつ私は，ときにはゆ 
っくり とあるいは素早くカウントを取るのであっ 
た。 

なにはともあれ， 大事なのは 賞ではなく， 「本来 
なら賞に 値する もの」 なのである。だから私とし 
ては，いきなり 「無冠の帝王賞 j とかいいだして 
ツッパル予定である。 （祝一平） 

■ GAME OF THE YEAR のノミネートといって 
も個人の 好みがあるから， これが 絶対い い！と 
言い切ることはできない。私の場合， たまたま B 
EEP というゲーム誌の仕事を していてほとんどの 
ゲームが見られるからということ もあって，今回 
の審査員 ノミネートに参加 させてもらった。と， 
偉そうに 言ったが，はっきり 言ってやっぱり好み 
で 選んでしまうのだ。 私は RPG マニアなので，最 
近の よくできた RPG を上位に選んでみた。いずれ 
も読者の支持の高いものになってしまい，おまえ 
もミーハーだなと思われては審査員としての立場 
がない。 そこで，あえて私は ファン タジアンが嫌 
いなのだ と言っ て おこう （立場はなお悪くなりそ 
うだが… ） 。ファンタジアン は読者が推薦するソフ 
卜の ナンバーワンだが， なぜ嫌いかというとオリ 
ジナ リ ティがぜんぜん 感じられないからなのだ。 
すでにウルテ ィマ m と ウィザー ド リィが日本のパ 
ソコンでも動いているので， わかる人にはわかる 
はず。逆にアクションゲームの テグザーは素晴し 
い。パソコンでは沈みがちだった アクションゲー 
ム界に 新風を 呼び起こした。 本当なら I 位にした 
いぐらいだが，どう も テグ ザーには SR のイメージ 
があるので Oh ! MZ で I 位になってほしくない気 
もしているのだ。 さあ君たちも独自の目と感覚で 
これが GAME OF THE YEAR という作品を選出 
してほしい。 

(早川浩） 
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I Part .1 ソフトでワイワイ 

JOY JOY PACK Special 
Part .2 清水和人のゲームハイテク道場 
Part. 3 GAME REVIEW 
Part. 4 special review 




. ソフトでワイワイ 

今月は新作 SOFT の紹介のほかに， MZ - 彳500用 JOY JOY PACK スペシャルの乱入もあ 
る。冬休みは思いっきりゲームに狂ってみるのもよいだろう。というわけで，今年もよい 
ソフトがたくさん発売されますよ一に0 


I MZ - 2500のウイザードリイ 
は発売されたか!？ 

ウイザードリイの日本語バージョンが発 
売された。肝心な移植の出来映えだが ， APP 
LE 版以来のウイザードリイファンの間でも 
かなり好評なようだ。ゲーム進行やプレイ 
ヤーそれぞれの冒険に影響するシナリオや 
マップは原作に忠実で，そして画面表示に 
はウイザードリイ III と同じウインドウ型式 
にバージョンアップされている。しかも， 
ハイレゾグラフイックによるキャラクター 
デザインがなされ，視覚的にもグンと楽し 
めるようになっている。移植で苦労したの 
は日本語への翻訳といわれるが，この日本 
語版ウィザードリィでは，英語，ひらがな， 
カタカナの表示が選択できるのはうれしい。 

ウイザードリイは， Xl / Xlturbo 版がア 
スキーから 発売されている。 しかし， この 
ウイザードがイが Super MZ すなわち MZ - 
2500でも出るとしたらどうだろう。実は， 
Oh ! MZ にはウイザードリイの MZ - 2500版 
がフォア. チューンから 発売されるという 
情報が入り，その動向を見守ってきた。と 
ころが，公式発表のないままとんでもない 
ことが起こった。11月24日の パソコンサン 
デー（テレビ東京）におけるウイザードリイ 
紹介の際，なんとウイザードリイが動いて 
いる MZ - 2500の姿が放映されたのだ。 しか 
も， PC -9801 ノぐージョンと同じく，キャラ 
クターネームが漢字表示になっていたので 
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ある。発売時期や価格については触れられ 
なかったが，もしかしてこの正月はウイザ 
—ドリイに ハマって しまった MZ - 2500ユー 
ザーが続出するのではないだろうか。 
Xl / Xlturbo 用 5 D : 9,800円 

アスキー 003(486)7111 


MZ - 2500用 3.5 D : 9,800円 

フオア.チューン 003(667)2707 


| 醞 


二缵ぽ G 


ウイル，テグザーと連続ヒットを続ける 
スクウェアが持ち前のアニメ処理技術をフ 


ルに 生かした過激なゲームを発表した。こ 
の新作ブラステイーでは1秒間に6 コマの 
絵を表示するアニメ処理が全編にほどこさ 
れている。そして，数百枚に及ぶアニメ原 
画を担当したのが，機動戦士ガンダムやダ 
ーテイペアで知られる日本サンライズだ。 

2枚のデイスタにテーマ曲を収録した ソノ 
シート，そしてその筋のマニアを狂喜させ 
る豪華設定資料集やステッカーまで付いて 
いる。アニメフアンの期待を担って12月末 
発売予定。 

Xlturbo 用 5 D : 7,800円 

スクウヱア 0044(63)6201 










































新作 SOFTWARE [ 

ザ • フアイヤークリスタル 

ブラックオニキスの続編，フアイヤータリ 
スタルの XI 版が遂に発売された。今回は，テ 
ンプル 編で魔法も使えるようになり，より正 
確な判断力と計画性が要求される。前作をも 
圧倒するパワーで面白さは保証付き。なぉ， 
ディスク 版は近日発売の予定。 

Xl / Xlturbo 用 T : 4,800円 

BPS 0045(421)7421 



ザ*ブラックオニキス 

日本の RPG 史上に輝くザ•ブラックオニキ 
スの MZ - 2500が発売された。オリジナルに忠 
実に移植され，しかもスピードは98 版よりも 
速い。君もこの名作に挑戦しよう。 

MZ - 2500用 3.5 D : 7,800円 

BPS S 045 (421) 7421 

リグラス 

森田和郎のランダムハウスが初のオリジナ 
ルブランドとして発表した 3 D リアルタイム R 
PG がこのリグラスだ。アルゴリズムを追求 
する森田氏の新技法により，フルカラー3次 
元の舞台が高速ョコスクロールする 0 6段構 
成の舞台に秘密のアイテムも豊富。そしてレ 
ベルアップの果てに本当の謎解きが始圭るの 
だ。 

Xl / Xlturbo 用 5 D : 6,800円 

ランダムハウス S 0298 (42) 1307 



SCAR し ET 7 


ぱれつと 


高速 ヨコス クロ ー ル型シューテイングアク 
シヨン〇コードネーム 「Scarlet 7 j という 
特殊コンテナを輸送するトランスポーターに 
乗り， USE 軍の攻撃を突破しなければならな 
い。ボディチェンジやパニツチェンジなどマ 
ニアックなメカシステムが魅力だ。 
Xl / Xlturbo 用 5 D : 5,800円 

" T : 3,800円 

ソフトプロ 006(363)1221 
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ユーカラ 

日本語ワードプロセッサとしてスタンダー 
ド的な位置を占めるユーカラの MZ - 2500版。 
データの互換性や通信機能も信頼性がある。 
MZ - 2500用 3.5 D : 28,000円 

東海クリエイト 003(456)4610 


日本語とイラストによるカラーグラフイッ 
ク印刷キットで， POP やダイレクト メールな 
ど幅広い活用ができる ッールで ある。 「ユー カ 
ラ」とのデータも利用できる。 

MZ - 2500用 3.5 D : 30,000円 

ダイナウェア 00727 (62) 2424 

トップマネジメント 

トップマネジメントは会社経営をシミュレ 
一卜体験できるマネジメントゲームである。 
社内研修から個人の自己啓発用としても楽し 
<活用できる。 

MZ - 2500用 3.5 D :19,800円 

Xlturbo 用 5 D :19,800円 

光栄 0044(61)6861 


16ビツトマシン用の日本語ワードプロセツ 
サ「テラ」が Xlturbo 用として登場した。や 
さしさに多機能を加えてパーソナルビジネス 
に威力を発揮することだろう。 

Xlturbo 用 5 D : 32,000円 

日本マイコン販売 003(366)3274 


インクポットデータライブラリ 
Vol . 4 パーティキット 
Vol . 5 クリスマスキット 
Vol . 6 年賀状キット 
Vol . 7 イラストアルバム2 
Vol . 8 挨拶状 

XI turbo / PC - 8800共用 5 D :各3,800円 
アスキー 003(486)7111 



NOBO 


軽井沢誘拐案内 
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JOY JOY PAC^SPECIAL 
MZ -1500 用 .Qd 2 枚組9,800円 
SBC ソマ.卜、弓ヱァ S 03(353)9241 


JOY JOY PACK SPECIAL 

ソフトと ポー ドで 2 讓こワィ 1 K 

MZ -1500 ユーザーのみなさん，クリスマスプレゼントの予約は済んだかな 0 また，もう 
冬休みでワクワクのみなさん，お正月ゲームの準備は万全かな 0 では，まだこれからとい 
う人を思いっきりひいきして，この JOY JOY PACK SPECIAL を紹介するとしよう 0 


家族みんなで楽しめるソフトをパックした JOY JOY PACK シリーズの第3弾が発 
売された。今までのような，ゲームあり，ワープロあり，といった幕の内タイプと 
趣向を変え，パック全体が ユニークな ひとつのゲームという構成になっている。 

さて，クリスマスやお正月ともなれば，どこの家でもボードゲームのひ 
とつやふたつは遊んだ経験があるだろう 0 最近ではボード版の 口 ー ルプレ 
イングゲームなども人気があり，ド ルアー ガの塔などもボードゲ 
ームが作られて好評だ。というわけで，今回の JOY JOY PACK 
SPECIAL はご覧のような楽しいボード盤が大きなポイン 
卜になっている。では，全体の内容を見てみよう。 

まず，メインゲームとなるのはドロールという 
ゲームソフトだ。これは，ロードランナーなどでお 
馴染みの米国ブローダーバンド社の人気ソ 
フトで今回 MZ -1500 のために移植されたも 


のだ。これに，シューテイングゲ 
ーム とサイ コロの 役割や ゲーム 
進行のためのソフトが2 
枚の QD にまとめられて 
いるのだ。 


1^4 Oh! MZ 1986.1. 
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シュー ティング ゲーム 


ドロ 


それでは， 実際の ゲームについて簡単に説明しよう。 
まず，メインゲームとなるドロールだが，宇宙大魔人 
にさ ら われたお母さんや弟，妹を助け出すため特殊スーツに 
身を包んだドロール君が4階建ての地下牢に挑むスリル満点 
のアクションゲームである。この JOY JOY PACK では，ドロー 
ル君の家族救出の物語を宇宙的スケールにふくらませている。 
物語は，ドロール君が家族救出の準備のためにアルバイトをしてお金 
をためる地球編に始まる。お金がたまったらいざ宇宙へ出発というわけ 
だ。宇宙にはいたるところで戦闘エリアに突入してしまい，ここでシュー ティ 
ングゲームをクリアしなければならない のだ。 このシュー ティ ングゲームも単 
独のパソコンゲームとして遊べるが， 難易度が 2段階あり，さらに宇宙船カードや 
途中で手に入れた武器力ードのキーワードを入力することによづてゲーム展開が有 
利になったりするのだ。そのほか，戦闘エリアをワープできることもあれば、ブラックホ 
ールに落ちて脱落ということもある。こうして数々の難関を突破したドロール君を待ち受 
けているのがメインゲームのド t ? ールである 0 1面は妹，そして弟，最後にお母さんを救出すれ 
ば感動的なデモ画面となり，助け出した家族の分だけボーナス 点と なるわけだ。 

このように，この JOY JOY PACK SPECIAL では， ドロール や シューティングゲームな どの パソ 
コンゲームを 有機的に結びつけて全体をひとつの ボードゲーム （ようするにス ゴロク だ）にまとめあ 
げており，数人でプレイすれば，ひとりで ゲーム ソフトをプレイする何倍もの楽しみが味わえるようになっ 
ている 0 もちろん ゲームを 盛り上げるためのイラスト ボード やお金，約束手形，進行用ソフトも付いて楽し 
さ いっぱい。 この冬は JOY JOY PACK で思いっきりワイワイやろう。 
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パソコンは格闘技だ 

清水和人のゲーム八イテク道場 

さあゲームも続々と出たところでよくプレイしたゲームにけりをつけようじゃないか0 
時代は今や完璧にロールプレイングしとる。続編だのいろいろあとがつかえているけん， 
3本+ a をまとめて面倒みようというわけだ。ページもないのでさっさといってみよう！ 



フアンタジアン 



リザード 



まずは死ぬほど遊んだフアンタジアンか 
ら〇 

❶アイテム情報 

クラスチェンジ ： Staff of Sage，Helm 
oi Aslam , Ring of Gold，Crystal Idol 
ストーリー用 ： Crest of Gold , Dragon’s 
Scale，Glocial Crystal (これらはそれぞ 
れの場所に2度行くんだったかな？） 

ハテナ編 ： Golden Cross はスケルトン，ゾ 
ンビ，ゴーストなどにのみ有効 。 Key of 
Chest これは合い鍵 

武器 : Irom Staff (パヮー 50), Fire Cross 
(75 )， Whip (75) , Thunder Axe (250)， 
Sword of Evil (300 )，Silver Sword (400)， 
Mum blade ( ?)， 

防具 ： Prayer Shisld (防御力1，ただし ATT - 
ACK SPELL の被害を小さくする。） Win - 
ged Helm (2), Golden Groves ⑶， Silver G - 
roves (2 )，Silver Plate ⑺， Elven Chain ⑸， 
Holy Robe (4), Darable Chain ( R ) 

❷戦關テクニック 

ATTACK SPELL をさけるために，敵に 
密着する。 ATTACK や BITE の強い敵には 
Long Bow で 0 

❺キャラ作り 

• ボーナスポイント9まで何度もやり直す。 
• ステータスは DEX を大きくして攻擎の確 
度を増す。 



ザ•ブラックオニキス 


• 5人作つて Join Gold して4人 コロス。 
•戦士（ドワーフ），盗族（ハーフオーク）， 
修道士（ハーフリング)，魔術師（ハーフェ 
ルフ or エルフ） 

❹装備 
初期状態 

Battler : L . Bow , L . Shield , Chain , Helm 
Thief * Axe , S . Shield , Leather 
Illusionist : S . Sword , S . Shield , Chain 
Monk : Staff , Leather 
最終状態 

Fighter : Mum Blade，Silver Plate , Winged 
Helm , Prayer Shield , Golden Groves 
Robber * Sword , Durable Chain , Helm , Pra ¬ 
yer Shield 

Magician : Irom Staff , HolyRobe , Prayer 



デーモンクリスタル 


Shield 

©マル秘作戦 

• EQUIP で# マークの 付いているやつに 
アイテムをあげると，アイテムが2 つに 
増える。 

• Fighter 以外は薬をひとつ多く持てる。 
•アイテムは4階の先の泉か，5階の Res - 
ting Room で出やすい。 

©キャラ育て 

地下4階の レベルダウンの 泉で レベルを 
下げてはまた旅に出る。いつかきっと ft パ 

ラ メータ ( DEX ， STR , VIT , AG , WIS , INT , 
HITS ) がよく上昇する 0 そうしたら次のレ 
ベルでもう1凹同じことをする。泉でレべ 
ルは下がってもパラメータは下がらない。 
HITS 以外のパラメータは18まで上がる。ま 
た，クラスチェンジの前は必ずセーブして 
おき，各項目があまり上がらなかったら， 
やり直すという方法もある。 


•ブラックオニキス 


以前かなり詳しい解説が本誌にも載った 
が，未だに質問が来るソフト。でもどうな 
んだろう。透明になる魔法のマントとスバ 
ラシイ Battle Axe をもち，オニキス（地上 


Oh! MZ 1986.1. 


















































































2階のマップさえ書ければ簡単に見つかる） 
を兒つけまくればそれでいいのではないか。 
他の階.はマップなんかいらないよ（でも地 
下1階と，地下6階のマップはいるかもし 
れない)。「イロイッカイズツ」も単純なひ 
っかけなのだ。 XI では逆順であり，しかも 
ドアの色は無視するが，降りた場所の寅色 
を抜かしてはいけないのだ。つまり最初は 
ああ行ってすぐ戻るのが正解ってわけさ。 

さらにオニキスを何度も発兄してレベル 
を上げる方法があるらしい。それは先頭の 
人がからんでいるとかいないと力*。そして 
私は今モー レツに 怒っている。「フアイヤー 
クリスタル」がテープ版だけ出たのだ。俺 
は「オニキス」をディスク版でやってたん 
だぞ 一。 フアンタジアンならテープ版のキ 
ャラをディスク版に移せるんだぞぉ。ア 
イテムだって多いしフアンタジアンのほう 
が上だい！まあオニキスのほうがスピー 
ドが速いけどね。 


モンク U スタル 


先月号で紹介したがまだ不十分だったよ 
うなので付け加えておこうっと。みんなは 
30 面でとっても苦労しているらしくて，「こ 
うやれば解ける」というハガキの中にも複 
雑すぎるのがあるんだよね。 1 階と 3 階で 
左右の XX に X 当た X をしてドアを XX っ 
ぱなしにして， TIME が 7000 を切ると 3 つ 
の玉が出ましたね？ そこでそれをブラッ 
クオニキスのように取るのです。つまり順 
番があるのだよ。しかもよく知っている順 
番だ。すると敵が来るのでビシバシとやっ 
つけるよろしある。ビシバシとだよ。先月 
の隐しコマンドを知っていれば誰でもクリ 
アできるよね (MZ-1500 用はまだよく知ら 
んけど)。 


リザード 


さあ今回目いっぱい遊んだリザードの紹 
介だ。 これは フアン タジアンの「クリスタ 
ルソフト」から出ているなかなかの RPG で 
ある（でも xxxx クロスはでえっ嫌いだ)〇 
パーティを組むのではなく，ひとりで寂 
しく行くのだ。 フアン タジアンと同様，ア 
イテムがいっぱい出てくるし，戦闘モニド 
も，敵キャラの絵もなかなか凝っていて楽 
しい。 


① キャラ作り 

戦士か魔術師か盗賊で，各項目は職業に 
よって一定である。お金もフアンタジアン 
のように金持ちから出発できないので，始 
めの装備は貧弱である。例によって商店， 
寺院，病院，宿屋もある。で地下の迷宮で 
はなく地上10階建てという紊華な屋敷であ 
る。 

② マッ プ作り 

なんとマップはヒントである程度ついて 
くるのだ。あとは一方向ドア，宝箱の位置, 
敵が必ずいる場所などを記入していけばよ 
い。もう方眼紙はいらない。上下へのハシ 
ゴではひとマスのところにあること力 ？ 多い。 

③ 戦闘 

ひたすらタイミング，すなわちアクシヨ 
ンゲームである。戦闘のシーンで敵と自分 
が動くのだが，敵がうしろへちょっと下が 
ったところを攻撃すると成功の確率が高い 
ようだ。また1度攻擊が成功したらテンポ 
よく 2 度 3 度とやっつけよう。自分がころ 
んだ直後も有効だし戦闘開始の音楽が鳴り 
終わった直後も成功しやすい。しかしやは 
り強い相手は強いのでどんどんこちらもレ 
ベルアップしたい。危ないなと思ったらす 
ぐ帰って治療することだ。セーブも欠かさ 
ないようにしたれ。 

④ 商店 

ここでは比較的早く 最岛 金額の武器や防 
具が 買 えるようになるが，あまり不相応な 
ものを付けていると，壊れてしまうことが 
多い。そんなに高くなくても十分通用する 
から無駄遣いしないように。また買ったも 
のは装備し忘れないよう気を付けて。 

武器の種類 


タンケン 

Gold20 

POW = +5 

ギンノタンケン 

Gold40 

POW = +6 

コン ボウ 

Gold50 

POW = +6 

ャリ 

Gold80 

POW= + 10 

オノ 

GoldlOO 

POW= + 12 

セントウオノ 

Goldl50 

POW = + 15 

ヶン 

Gold200 

POW = +20 

ホシノケン 

Gold300 

POW=+22 

ツキノケン 

Gold500 

POW=+25 

タイヨウノケン 

GoldlOOO POW 二 +30 

防具 



カヮノ ロープ 

Gold50 

AGI=+5 

クサリカタビラ 

Gold200 

AGI = + 10 


テツ ノヨロイ 

Gold300 

AGI = 

=+20 

ドウノョロイ 

Gold200 

AGI = 

=+ 15 

ロ ツ クフ。レ ート 

Gold250 

AGI = + 18 

ハードロックス 

Gold400 

AGI = 

=+25 

キノタテ 

Gold50 

AGI=+5 

ドウノタテ 

GoldlOO 

AGI = 

=+8 

テツノタテ 

Gold200 

AGI = + 10 

ミュウノタテ 

GoldlOOO 

AGI = 

=+ 16 


⑤病院 


ここがこの ゲーム の キー ポイントである0 
病院では次の 4 つのモードがある。 

• 治療: 1000 gold で全快 
•毒抜き： 30gold で全快 
•薬を買う 

•LIMIT を増やす：レベルに応じた金額で 
LIMIT を増やせる。このゲームでは レべ 
ルアップしても LIMIT は増えない 0 
このうち3番目の薬にはいろいろある。 


(イ）キズグスリ 
( 口） ゲドクザイ 
(ハ）ウデノクスリ 


lOOgold 

60gold 

dOgold POW= + 10 


( 二）アシノ クスリ 80gold AGI= + 10 
( ホ）アタマノクスリ 70gold INT= + 10 
がある。しかし （ハ ) (二)(ホ)は一時的にしか 
効かないのであまり使わない。薬よりレべ 
ルアツプのほうが大切なのだ。 


⑧宿屋 


最初のうち少し使うかもしれないが，概 
して無用の場所。傷をいやすなら病院で治 
療するのがいちばん。 


つづく 


協力栃木周さん，神奈川水井さん 
宮崎渡辺さん，宮城満久保さん 
有難うございました。記念品をお送りいた 
します。 


翁フアンタジアン 

[ 5 D 

: 7,300円 

X 1/ X 1 turbo 用 

IT 

: 5,800円 

春リザード 

( 5 D 

: 6,800円 

XI/XI turbo 用 

IT 

: 4,800円 

以上クリスタルソフト 

006(326)8150 

•ザ•ブラックオニキス； 

f 5 D 

: 7,800円 

Xl / X 1 turbo 用 

It 

: 5,800円 

BPS 

0045(421)7421 

參デーモンクリスタル 

I 5 D 

: 6,200円 

Xl / X 1 turbo 用 < 

| 丁 

: 4,000円 

MZ -1500 用 

1 QD 

: 4,500円 

電波新聞社 

©03(445)6111 
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GAME REVIEW 


GAME REVIEW では，最近発売されたゲームの中から，気になるソ 
フト，見逃せないもの，読者の要望の高いものなどを対象としています。 
今月は，ドルアーガの塔， NOBO , チャンピオンプロレス Special , 軽 
井沢誘拐案内の 4 作品です0ご意見ご希望などをお待ちしております。 


■■■■■■■■■■■■■ 


ドル ァーガ の塔 

ファミコンで人気ナンバーワンのソフト，ドルアーガの塔が MZ - 1500 版で登場！君も 
ドルアーガを倒して，愛するカイを救いだせ。 


THE TOWER OF DRUAGA 。 この夕 
イトルの響きに底知れぬ魅力を感じるのは 
私だけであろうか。ド ルアー ガの塔は言わ 
ずと知れたナムコのビデオゲームで，この 
夏ファミコンに移植されて大ヒットとなっ 
た。パソコン用は MZ -1500 版が初めての登 
場である。移植の出来映えからいうと，さ 
すがにスピードや操作性にムリがあるよう 
だ。それでも，グラフィックはなかなか美し 
く，音架はちょっと軟弱な感じだが一応原 
曲に忠実に作られていて楽しい。 

とにかく，ド ルアー ガフ イーバー はかな 
りのもので，必勝本もベストセラーになる 
ほどだ。ゲームセンターでなにもわからぬ 
まま100円玉を浪費してしまった人は，ぜ 
ひ敵をとってもらいたい。というわけで， 
ギルはド ルアー ガを倒せるか？ N . N . 


あの ハイ ドライドで レディーアーマーを 
連続〇人倒さないと〇〇しないとか，ウィ 
ザードの魔法を5発受けてから倒さないと 
x x できないとかいうやつは，み〜んなド 
ルアー ガのせいなんだゾと，ぼくは信じて 
いるのです。それほどド ルアー ガは苦しい 
ゲームでした0今でこそ，いろいろな秘密 
が明かされ，解決の手引書なるものも出て 
いる力す，ほんとうに地道にひとりで謎を解 
き明かしていった人というのはどんなやつ 
なんだろうと思わず身ぶるいしてしまう。 

この MZ -1500 用はなかなかの力作だけど 
キャラクタをスプライトのように動かすの 
はできないものかなあ。それでも，ちゃ一 
んと褒ドル アーガ まであったのに は 感心し 
た。1500 ユーザーには ぉすすめです。 

P.S •トレーナーも買つちまったい！ S . S . 


NOBO 

MZ - 2500のスムーズスクロールが 生かされた ゼビウス タイプの シューテイ ング ゲーム。1 
周 29 分の戦閼空域には壮大なシナリオが隠されている。 


味方機は戦闘機然としていて翼もあるし， 
敵機は丸や四角の シュールな 形だし，回転 
板はあるしピラミッドもあるという典型的 
な ゼビウス型 シュー テイング ゲームで ある。 
確かに評判の スクロールは 滑らかだし，才 
ープニン グミ ュージ ックも経快で良いが， 
画面両サイドの情報が少なく，戦闘中の B 
GM もないに等しいので退屈さを感じる人 
もいるた f ろう。などとケチをつけたわりに 
は10分の壁が破れず，私は泣いている。う 
一ん。何分後にどのエリアに達するかがわ 
かるのは憎い。どうせなら，戦闘中に時間 
もわかれば いいのに。 

最後に，どの敵がどう動くかはすぐに把 
握できるので，それをいかに見切るかがポ 
イントだ〇そしてプレイヤーは，29分の死 
闘に耐えねばならない。 K . Y . 


これはグラフィックにものを言わせたゲ 
ームです。ご存知のように MZ - 2500版のス 
クロールは極上の滑らかさで見るものを圧 
倒させます。この NOBO は1周するのに29 
分間もかかるという壮大なるゲームで，敵 
の攻擊は休む間もなく続きます。これを連 
続プレイで楽しみましよう （ ESC キーは外 
しておきましようね )0 ゲームを進めていく 
と隠れキャラクターを思わせるものが画面 
の中に登場してきます。120エリアをクリア 
するのは困難でしよう。自然の照準がない 
のは残念ですが（ジエルダもそうでした}， 
慣れることですね，はっはっは。気が付い 
たら殺られていたというのはグラフィック 
のせいです。そう，君は雨あられと降る弾 
の合い間をぬううちに，「弾が止まって見 
える」と言うことだろう。 R . S . 



H . K . 評価項目 S . S . 
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MZ - I 500 用 0 D : 4,800円 

MZ - 2500用も発売予定 

電波新聞社 003(445)611 1 



K . Y . 評価項目 R . S . 
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MZ - 2500用 3.5 D 6,800円 

コムパック 003(375)3401 
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評価段階 

►►►►►►► 素睛しい 
► ►►►►► よく出来ている 

►►►►► まずまずである 


► ►►► 
► ►► 



普通 

少しもの足りない 
劣っている 
劣悪 


評価 グループ 

有囝隆也浅野恵造祝一平牛嶋昌和エ藤誠挙市哲司こうもと 
やすひこ小森隆近藤弘幸斎藤晋斎藤亮佐藤友彦清水和人 
白河哲立花かおる中川智哉 Hiroshi Omaeda 茗原秀幸吉田幸一 


チヤンピオンプロレス Special 

MZ , XI にとってまさに待望のプロレスゲームが登場した0人気レスラー総出演でエンタ 


テイメントとしてのプロレスが楽しめる。 

やっぱり， プロレス はこうで なくっちゃ 
あ。ちまちました関節技よりもラフファイ 
卜，人技の連発で“見せる プロレス” をパ 
ソコン上にそのまま再現したような ソフト 
なのだ。キャラクタは6種類（テープ版は 
2種類）あって，どれもかわいいと言える 
ほどコミカルなのだが，試合の内容は大真 
面目である。絶対見ることのない A . ジャイ 
アン〇のパイルドライバーや，近頃見かけ 
ないブッ〇一の凶器攻搫が見れるんだから， 
プロレスフアンに とってはこたえられ ない 
だろう。場外乱闘で鉄柱攻擎， フェンス® 
撃も自由自在。ただし，3分3本勝負なの 
で，ぐずぐずしていると時間切れで相手（チ 
ャンピオン）の防衛となってしまう。これ 
でキャラクタの コンスト ラクシヨ ンが あれ 

ば完璧なんだがなあ。 M . K . 


場内，興奮に包まれております。タイガ 
一対ジャイアンツの一戦。タイガーが体重 
差をどうカバーするのでありましよう力、 
注目されます。3分間3本勝負の短期決戦。 
さあ，ゴングが鳴った！ お一っと，いき 
なりドロップキック，返す刀で口ーリング 
ソバットだ，これはたまらない，ジャイア 
ンツ，もんどり打って倒れました。すかさ 
ず上から エルボーの 嵐だ，カウントが 入っ 
た。1，2，3,決まった。1本目は速攻 
でタイガー先取！さて2本目，おっと今 
度はタイガーが捕まった。軽量の悲しさ， 
いいように振り回されている。どうやら2 
本目はジャイアンツ優勢の模様。しかし， 
誠に残念ながらここで放送時間がなくなっ 
てしまいました。うわっ場外乱闘だ，それ 
では皆さん，さようなら。 T . K . 


A. BUCHIC 
310LBS 


H HOGEN 
/H(^310LBS 

S. HANSON 
吩 300 LBS 

A. GIANTS 
^^590LBS 


FALL 

BACK DROP 
PILE DPIUER 
KNEE DROP 
BODY SLUM 
ELBOW DROP 
DROP KICK 
BRAIN BUSTER 
HIGH KICK 


M . K . 


評価項目 


T . K . 
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MZ - 2000 /2200/2500 用 
XI/XI turbo 用 

" 

マイクロネット 


T : 4,800円 
5 D : 6,800円 
T : 4,800円 
S 0 II (56 I ) I 370 


軽井沢誘拐案内 

マンガゃアニメからパソコン業界まで，めっきり有名人となった堀井雄二の最新作がこ 
のゲーム0大胆な着想のニュータイプアドベンチャーだ0 


ナウイ町，軽井沢のお話です。その昔， 

中軽井沢，北軽井沢と次々に繁殖して，そ 
のうち東京の練馬界わいまで経井沢という 
地名になってしまうんではないかと危具さ 
れた恐怖の町で，カワイコちゃんが突如と 
して誘拐されてしまいます。 

そして，まいどおなじみの犯人捜しとな 
るわけですが，あっちこっちで話を聞いて， 
抱きよせたり，しめあげたり，押したり， 
たたいたり，あの手この手で誘拐犯人を兄 
つけようとしているうちに，思わず目的を 
忘れてしまい， テニス クラブで ニタニタ， 
あさみちゃんとお話してホクホク，思わず 
ホテルの支配人まで抱き寄せて大混乱，最 
後は神様仏様にまで協力してもらって，い 
ざ RPG へと突入するのでありました。い 
や一面白かった……。 T . S . 


カルイ ザワッ アソレカルイ ザワツ 
W ったゲームは軽井ざわっ，買ったオイラ 
も軽井ざわっ（以上東北民謡より）。 

なんてえこったい。あのポートピア殺人 
事件-を作った人がこんなになっちゃったぜ。 
これがなんとも面白い。しかしなんで最近 
甘 n のソフトが多いんだろう。きっとみん 
なホイホイ買うのやろうなあ。しっかしま 
あそんなに難しいアドちゃんではない。出 
てくる画面が軽井ざわっじゃなくて，出て 
くる場面とストーリーも軽井ざわっじゃな 
くて，その両方を楽しむっていうアドベン 
チャーですな。ウヮァなんてえ刺激的なん 
だってついつい引き込まれるわっけ一。で 
もこんな過激なロー ドの仕方じゃディスク 
が壊われるんじゃないかと思うわっけ 一。 
日本語は正しく使いましよう。 K . S . 
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SPECIAL REVIEW 
印刷工房 XIturbo ユーカラ用 

この印刷工房を利用すると Xlturbo 用のユーカラで作成された文書で多彩な 
印字が可能です。しかも，お手持ちのプリンタが8ピンや〗6ピンでも，24ドッ 
卜明朝体文字に変換されて印刷できるというまったく不思議なソフトです。 



最近は漢字プリンタ （24 ドットのもの） 

もかなり手に入りやすくなってきました。 
しかし，8ドットのプリンタを使っている 
方も多いと思います。それがこの「印刷工 
房」を使うと何と8ドットのプリンタでも 
24ドットの明朝体文字が印刷できるように 
なるというのですから驚きです。もちろん， 
16ドットのプリンタでもできますからほと 
んどあらゆるプリンタが24ドットの漢字プ 
リンタと同じになるということです。明朝 
体文字が印刷できるということだけでなく， 
アンダーライン，網かけ，評線，斜体文字， 
4倍角や％角文字も印字でき，分数表示や 
ルビの印字もこなしてしまう（すべてのプ 
リンタで可能）というすごいソフトです。 

さて，このソフトはユーカラ（東海クリ 
エイト社製ワープロソフト）で作成した文 
章を印刷するというものです。したがって 
文章の作成には当然ユーカラが必要です。 
いろいろなタイプの文字の指定はユーカラ 
の文章作成中に行います。特殊な印字をし 
たい文字列の前{.二—（アンダーバー）と英 

印字サンプル（ブラザー M - lb 24 使用） 


数記号（半角）の組み合わせで機能を指定 
します。こうして作成した文章を印刷工房 
で呼び出して印字するわけです。 


蘧窗な印字機能 


24ドットの明朝体で漢字が印字できると 
いうことのほかに具体的な機能を挙げてみ 
ましよラ〇 

a ) 斜体文字：文字を斜めに傾けて（角度は 
2通り）印字する。 

b ) 網かけ文字：文字に13種の網かけと2種 
類の訂正ラインを印字できる。 

c ) 強調文字：文字の縦線を太く印字する。 

d ) 反転文字：文字の白黒を反転させる。 

e ) 淡調文字：文字を3段階に淡く印字する。 

f ) カラー印字：カラープリンタの場合に7 
色のカラー印字ができる。 

g ) 縦倍角 • 4倍角：文字を縦方向に2倍に 
します。横も倍角ならば4倍となる。 

h ) 接続改行：行と行をつなげる。 

i ) % 改行：％行改行する0分数表示やルビ 
に利用。 



といったような豊富な印字が行えるほかに 
これらの複数の組み合わせ（たとえば，4 
倍角で斜体字にして網かけをする）も可能 
です。 

ただ，ひとつの機能を指定するのに全角 
文字1文字分（半角2つ）の場所をとるの 
で，1行の文字数がその分減ってしまうと 
いう欠点があります。 


プ 1 J ンタ制御と外字管理 


文字種類が豊富なことに加えて印刷する 
ときの機能も豊富です。具体的には，印字 
方向（縦•横)，ページ印字，用紙サィズ， 

1行の文字数，文字•行間，袋綴じ，部数な 
どの設定が行えます。また，アンダーライ 
ンは，127種類の組み合わせが選べます（た 
だし，1回の印刷には1通り）。ほかにも印字 
を開始するところと終了するところがペー 
ジと行単位で指定できます。 

外字は512種類が登録されていて変更も 
できます。作成のエディタは非常に強力で 
24ドットのフォントも楽に作れます。ほか 
の文字のフォントを呼び出したり，一部分 
を縮小したり，反転•回転などもできます。 
また，印刷工房で作成した外字の任意の30 
字をユーカラに転送できます（ューカラの 
エディタは使いづらいが……)〇 

とにかく，凝った印字ができるので人に 
見せる文章の印字には最適です。クラス新 
聞やサークルの連絡，回覧板などに便利で 
す。印字速度は遅いので大量の印字には向 
いていませんが，印刷の楽しみを満喫でき 
る.ソフトです 0 (north fox ) 

「印刷工房」（ XI turbo 用，要ユーカラ） 
5 D 2 枚（マニュアル付〉 14,000円 

モーリン S 03 (457)7479 


::::ふ:: 


:::顯 P 幾::：と 


を組み合わせると、いろいろの印字を楽しむ事ができます。 


斜体好、 mmmm, 
IBSHM などが自由自在にできます。 


糊姓 S 麵文字 


ふ-ん琴う〇よ 


また、分数表示やルビ打ちに便利な2/3改行もできます0 


) P +2 X . XHI 


3 X 2 +7 X +4' t "3 X 2 -2 X -8""(3 X +4 XX +1) x ( X +2 XX -2) 一 M 
外字ちいろいろあります。 


=^ t なんてことちできます。 


— - 一 • 
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THE SENTINEL 


共通 I / O ポート， FM 音源ボードはもう製作 
しましたか？ 今月は MZ / X 1 がモノ フォニ 
ックシンセサイザとして使える FM 音源サウ 
ンドエディタの発表です。ここでひと言 0 ヤ 
マハの YM -2203, YM -3014 が高すぎるという 
人。掲載した価格は定価 （？） ですから，これ 
よりも安く買えるはずです。また，実際に手 
に入りにくいという人もとりあえず1セット 
だけでも購入しましょう。 FM 音源ボードを 
製作するとき， 1 C ソケットはすべて取り付け 
たうえで，左右いずれか一方に石をさしてく 
ださい0もう一方のソケットはあけておけば 
よいのです。 3 和音までですが鳴らすことが 
できます0なお，今月のサウンドエディタを 
使うときは部品配置図右列に YM -2203, 3014 
をさしてください。 LFO (147 ページ参照）は 
使えませんカヾ，ほかは正常に動きます。 

• Lisp 入門はいい。最初 S -0 S の Lisp を打ち込 
んだとき「こんな苦労の代價に何かいいこと 
あるのだろうか」と思っていた。入門を読む 
たびに苦労が報われてくる気がする。 

山田剛 （14) XlCs 
しっかり読んで勉強したら， Lisp 上の簡 
単なアプリケーシヨンでも作って送って 
みてください。この欄で紹介していきた 
いと-思います。 

•私としては貴誌に対して高度なコンピュー 
夕雑誌としての道を進んでいただきたいと思 
っている。ついては共通モニタの言語アプリ 
ケーシヨンとして Forth , Pascal , PL / I などの 
高級言語を制作し，さらにハードウェアにつ 
いてもどんどん進めてほしい。 

山田昌良（け） MZ -700, MZ -2200 
•誰か10進^2進変換ルーチン（浮動小数点 
用）と浮動小数点演算パッケージを作ってく 
ださい。 Lisp , Prolog , Forth などが整数型で 
終わらないために！ 

関根孝司 （17) MZ - I 500 
とりあえずは整数型でもいいと思います 
が，これが実現したらぉもしろそうです 
ね。テーマは 「 S -0 S の言語に浮動小数 
点演算を！」0誰か挑戦しませんか？ 

• ZEDA を毎日便利に使わせてもらっています。 
皆さんもやっていることでしょうが，この前 
「 Z 80 ASSEMBLER 〜」と出力しているところを 
いじってメッセージを変えてみました。その 
ときにふと，そのあたりの表示関係をいじれ 
ばおもしろいことができるのではと思い，い 
ろいろ解析して みた 結果，見事に成功しまし 
たので報告します。 

まず 「 Z 80 ASSEMBLER 、」 のメッセージは 
1558行のところで出力しています（皆さんご 
存じでしょうね）。これをやめさせるには 「CALL 
SPRNTj を 「JP 3D52hj に変えます。 

また， Z 80 の マシン コードは最長で4バイ 
卜ですから，7バイトもオブジェクトを表示 
するのは無駄なように思います。これを変更 
するには1545行を害き換えれば 0 K です。 
「IF A < >0 THEN LD B , 3 ELSE LD B ，7 」の 
「LD B , 3」は A // でアセンブルしたとき ， 「LD 
B , 7」は A / でアセンブルしたときに表示され 
るオブジェクトのバイト数です。これを4に 


すれば4バイト表示になります。 

これに合わせて行番号や ソースの 表示位置 
も前へずらしましょう。それには1505行に手 
を加えます。 A // でアセンブルしたときには 
r LD B , I 5 j が有効になり， A / のときには 1 LD 
B , 28」が有効になります。4バイトのオブジ 
ェクト表示にするなら，4 X 3 + 6で 「LD 
B , 18」，5バイトなら5 X 3 + 6で 「LD B ， 21」 
という具合に書き換えるとよいでしょう。 

プリンタでページングするのを止めるには， 
1558行を 「 JP 3 D 58 hj に変え，さらに1573行 
を 「JP 3 D 62 hj にすればできあがりです。 

例として， A // でオブジヱクトを4バイト 
表示にする方法を窨いておきましょう。同時 
に 「 Z 80 〜」のメッセージを削り，ページン 
グの機能は残しておきます。私が現在愛用し 
ているフオーマットです。 

1558行 —JP 3 D 52 h 
1545行 — IF A < >0 THEN LD B , 4 
ELSE LD B , 7 

1505行 — IF A < >0 THEN LD B , 18 
ELSE LD B , 28 

オブジェクトを書き換えるなら， 

3 D 0 F CD 22 38 — C 3 52 3 D 

3 CF 7 06 03 -♦ 06 04 
3 C 90 06 OF — 06 12 
となります。皆さんも自分の好みに応じてフ 
オーマットを変えてみてはいかがでしょう。 

田端敏之 （18) MZ -2000 
皆さんの研究発表をお待ちしております。 
•お願い。もう一度 S -0 S “ MACE ” の掲載を！ 
僕は6月号が出た当時には S -0 S “ MACE ” の重 
要性がわかっていませんでした。しかし，7， 
8，9月号と次々に S -0 S 上で走るプログラム 
が掲載され，「うっこれはいいプログラムだ」 
と思ってもあとの祭り。 “ MACE ” を持ってい 
ないので僕のマシンでは走らせられないのだ。 
6月号のバックナンバーは書店にもなく，友 
人も誰ひとりとして持っていません。6月号 
を買っていない僕にも S -0 S を！ 

三木隆浩 （15) XlCs 
来月はいよいよ皆さんからのお便りをも 
とにパワーアップした S - OS のバージョ 
ンアップ版を発表します。期待していて 
ください。 

• S -0 S 用に A . C . T . S . (アクツ）を作ろうと思 
つたがカタカナが使えないので断念した。し 


CIOS 掲載記事 

■85 年6月号 
序論共通化の試み 
第 I 部 S -0 S “ MASE ” 

第2部 Lisp -85 インタプリタ 
第3部チェックサムプログラム 
_85年7月号 

第4部マシン語プログラム開発入門 
第5部エディタアセンブラ ZEDA 
第6部デバッギングツール ZAID 
■85 年8月号 

第7部ゲーム開発パッケージ BEMS 
第8部ソースジェネレータ ZING 
■85 年9月号 

インタラプト S -0 S 番外地 
第9部マシン語入カツール MACINT 0 -S 
等10部 Lisp -85 入門（ I ) 

■85 年10月号 

第丨丨部仮想マシン CAP - X 85 
連載 Lisp -85 入門 （2) 

_85年 II 月号 
連載 Lisp -85 入門 (3) 

■85 年12月号 
第 12部 Prolog -85 

氺 Lisp -85, ZEDA , ZAID , BEMS , ZING , MACINTO 
• S , CAP - X 85, Prolog -85, FM 音源サウンドエ 
ディタなどのアプリケーションプログラム 
は，基本オペレーティングシステムである 
S -0 S “ MACE ”（85 年6月号）がないと動作し 
ませんのでご注意ください。なお，2月号 
にディスク版を含むバージョンアップ版を 
掲載する予定ですので，そちらを利用する 
こともできます。 


かたなく XI 専用の A . C . T . S . を作ることにした。 
さて， A . C . T . S •とは何でしょう？ 

坂本隆志 （17) XICk 
ACT って入ってるからアクションゲー 
ムか何かでしよう力、。ところで， S -0 S 
のバージョンアップ版ではカタカナもサ 
ポートします。さあ，これで作る気にな 
ったでしょう？ 
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拿挛拿 ALLOCATER V.3-1 拿拿拿 


BY 


r.HIKITA 


1F80H 


» GETPCs EQU 

’ EOT: CQU 

I PR6ST: EQU OB000H 

， ALSIZi EQU 0044H 

) TSIZEj EQU O044H 


11 STARTs EQU PRGST-TSI2E-ALSIZ 


GET PR6RAM COUNTER 一 
CAL し GETPC 


;POP HL,JP <HL) 
5 END MARK 
} PRGST 

;A しし OCATER SIZE 
;TABLE SIZE 


31 
321 


：i ID BC,PC 

し D D，H ; 

LD E，L 

♦♦+ FOR RESTART ++♦ 

INC HL 

し D (HL),E 

INC HL 

LD <HL),D 

++♦ SAVE RETURN ADDRESS — 

kVEs LD H し, PRGST — PC 

ADD HL,DE i 


HL,0 

HL,SP 


AF8D EB 

AF8E F9 

AF8F 213E 00 

AF92 39 

AF93 73 

AF94 23 

AF9S 72 

AF96 

AF96 

AF96 

AF96 21 BQ 00 
AF99 39 
AF9A AF 
AF9B ED 42 
AF9D 44 
AF9E 4D 
AF9F 
AF9F 
AF9F 

AF9F 1185 00 

AFA2 2141 00 

AFA5 39 

AFA6 EB 

AFA7 39 

AFA8 

AFA9 

AFA8 

AFA8 

AFA8 

AFA8 F9 

AFA9 

AFA91A 

AFAA B7 

AFAB 28 0B 

AFAD 13 

AFAE 26 00 

AFB0 6F 


DE # HL ; 

SP,H し ； 

HL f SAV8P-PC 
HL,SP I 

<HL),E ； 

HI 

(HL) f D 
CALCULATE し OAD OFFSET ， 


ADD 

LD 

INC 


ADD 

XOR 

SBC 

LD 

ID 


.SET REGISTERS 


HL,0 

HL,SP 

A 

H し, BC 

B, H 

C, し 


LD 

し D 


DE f PR6ST-PC 

KL,TBL-PC 

H し, SP i H し 《TB し 


ADD 

EX DE f HL 

ADD HL,SP 9 HL-PR6ST,DE*TBL 

拿拿拿 1BYTE TABLE VERSION 拿蓴拿 

CAUTIONi OFFSET MUST BE LESS 10QH 

LD SP,HL 

\Gi し D A, <DE) 

OR A 

2,01 JT 


INC 

し D 

LD 

ADD 

LD 

POP 


DE 
H t 0 
し， A 
HL,! 


,SP 

参 HL 


■J ロケ-夕 


ブルのお話 


リロケータブルなマシン語入カツ 
ール MACIMTO - S の発表以来，プログ 
ラムを自由なアドレスに置くという 
話題は新鮮な反響を呼び，たくさん 
のお便りが寄せられています$今回 
はその中から2つの読者投稿を紹介 
しましょう。 


iiii 川 immmmmmiiiiii 川 mim 川 I 川 II 川 II 川 iiimii 川 iiniimm 川 nmmmiim 川 mimiiimmmmmmiimiimni 川 mimiiimmi 川 H 


チェツクサムをリロケータブルに 

ALLOCATER 


Hikita Takashi 

疋田孝 


1111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111 ^ 


85年9月号に MACINTO-S というッール 
が載っており，完全リロケータブルと書い 
てありました。この話に刺激された私は， 
前に手を入れていたプログラムをひっぱり 
出し， Oh!MZ チェックサムプログラムにハ。 
ッチ当てするプログラムを作りました。そ 
れが今回のアロケータです。このアロケー 
夕を使えば， S-OS 用の Oh!MZ チェックサ 
ムプログラムカす，リロケータブルなチェッ 
クサムに早変わりという.わけです。 

11入力と起動方法 

まず， Oh!MZ チェックサムプログラムを 
ロードします。 

• BOOOh 〜のチェックサムの場合 
AF 78 h よりリストト A のとおりにダンプ 
リストを入力し， AF 78 h 〜 BIFFh を適当な 


ファイル名でセーブします0 
• 300 Oh 〜のチェックサムの場合 
リスト 1 -A を 2 F 78 h より入力したあと， 2 F 
7 Dh の AFh を 2 Fh に変更し， 2 F 78 h 〜 31 FFh 
をセーブします。 

好きな番地にロードして，そこへ J 命令 
でジャンプすると起動します。 

く注意〉 

MACINT 0 -S と同じジャンパを利用して 
いますので，起動前に 1 F 80 h から2バイト 
が EIh , E 9 h となっていなければいけません。 

m プログラムの説明 

このプログラムは，ほかのアドレスに動 
かすと支障をきたすため変更しなければい 
けないデータに，テーブルを利用してパッ 
チを当てるものです。 


テーブルにはパッチを当てる個所が相対 
値として入っています。次のパッチ当ては 
何バイト先という具合です。このテープ 
ルを自分で作り TSIZE を変えてやれば，ほ 
とんどのプログラムはリロケータブルにな 
ります。 

ただし，次にパッチを当てる番地の相対 
アドレスが FFh をこえる個所がある場合は 
このバージョンではサポートしていません。 

リスト 1-A ALLOCATER ダンプリスト 


AF78 

CD 

80 

IF 

01 

7B 

AF 

54 

5D 

:48 

AF80 

23 

73 

23 

72 

21 

85 

00 

19 

: EA 

AF88 

E5 

21 

00 

00 

39 

EB 

F9 

21 

: 44 

AF9Q 

3E 

QO 

39 

73 

23 

72 

21 

00 

: AO 

AF98 

00 

39 

AF 

ED 

42 

44 

4D 

11 

:B9 

AFA0 

85 

00 

21 

41 

00 

39 

EB 

39 

:44 

AFA8 

F9 

1A 

B フ 

28 

OB 

13 

26 

00 

-■36 

AFB0 

6F 

39 

F9 

El 

09 

E5 

18 

FI 

:79 

AFB8 

31 

00 

00 

C9 

02 

03 

05 

06 

:0A 

AFC0 

04 

03 

03 

05 

06 

03 

04 

08 

:24 

AFC8 

05 

03 

06 

04 

08 

16 

03 

04 

s37 

AFD0 

05 

OA 

06 

04 

OB 

05 

03 

03 

:2F 

AFD8 

03 

03 

03 

03 

07 

0C 

03 

05 

:27 

AFE0 

05 

03 

03 

03 

03 

03 

04 

03 

: IB 

AFE8 

04 

04 

06 

03 

09 

0A 

13 

06 

:3D 

AFF0 

03 

03 

0A 

06 

03 

08 

06 

03 

:2A 

SUM: 

4E 

BD 

20 

02 

7F 

48 

13 

F8 

: FF 

AFF8 

08 

20 

03 

51 

03 

03 

03 

00 

:85 

SUM: 

08 

20 

03 

51 

03 

03 

03 

00 

:85 


リスト 1-B ALLOCATER ソースリスト 


CDS545D 23732372 2119S 
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85年6月号から始まった S - OS , 毎号シ 
ステム系の発表が続き，編集室の並々なら 
ぬ力の入れようにマイコンを持たぬ私はた 
め息混じりに見ておりましたところ， 9月 
号でリロケータブルについて取り扱ってお 
りましたので便乗的に口をはさましていた 
だこうというあつかましい所存であります。 

_リロケータブルについて 

リロケータブルなプロ グラミングと Z 80 
CPU との闘いは今に始まったものではあり 
ません。おそらくは MZ -80 K が世に出た時 
代にはすでに始まっていたでしよう。しか 
し，その手段はというと， 

1) プログラム内の絶対ア ドレスに 関する 
命令を探し出し書き換える。 

2) プログラム内の書き換えるべきアドレ 
ステーブルを用意し，それに従って書き 
換える。 

3) PC の値を得ることによって，絶対アド 
レスを修正しながら実行する0 

4) リロケータブルな命令のみ使い，絶対 
アドレスに関するものを使用しない。 

のうち，もっとも消極的な 4) に頼ったもの 
が大部分でした。 

以下4つの方法を見ていきましよう。 

1) の方法はプログラム中の C 3 h や CDh な 
どを探し出し，続く 2バイトを書き直して 
おいてから実行するというものです0セル 
フ •リ ロケータブル.デバッガ （ I / O ) はこ 
の方法を用いた代表的なものであるといえ 
ます。しかし， データ 中に C 3 h や CDh があ 
ると誤って書き換えられる恐れがあるため 
注意を要します。 

2) の方法は，あらかじめ書き換えるべき 
ア ドレステーブルを 内部に用意す る ことに 


よって 1) の方法の欠点を補おうとするもの 
です0しかし，テーブルの製作•管理•変 
更がかなり煩雑であり，結果としてプログ 
ラムの変更が困難となってしまいます。結 
局， 2) の方法によるプログラミングは非生 
産的と言わざるをえないでしよう。 

3) の方法には多くのバリエーシヨンがあ 
り， MACINTO - S に用いられたものもその 
ひとつです。この方法は『インターフエー 
ス』，82年2月号で初めてマイコン雑誌上に 
発表され， Z 80 CPU 上で同じ目的を持って 
闘っていた多くの同志の注目と賞賛を浴び 
ました。当時 ， ANCHOR ( Oh ! MZ ではジヤ 
ンパと呼ばれている〉として発表された方 
法が偶然にも3年前と同じ姿で使用された 
ことからももっとも有効的な方法と考えら 
れます。 

4) の方法はもっともポピュラーなもので， 
その例はあちこちに見受けられます。 

_ BOUNCER 登場 

前おきが長くなりました力 ? ，いよいよ本稿 
の真打ちの登場です。前述の ANCHOR と同 
時に発表された BOUNCER にあやかって同 
じ名前を付けました。混同しては困るので, 
本稿では以下“先代”と呼ぶことにします。 

このプログラムは，以下の点で先代と異 
なっています。 

1) LD 命令を含むすべての絶対アドレス閨 
係の命令をサポート。 

2) それに伴いプログラムサイズが大きく 
なった。 

3) 同時に実行速度が多少低下した。 

4) BOUNCER を経由する前後において， 
レジスタ，フラグは一切影響を受けない0 

5) 使用方法が簡単であるため，アセンブ 


ラを使用すれば，プログラムを固定アド 
レスで作ろうとリロケータブルに作ろう 
と手間がかわらない。 

当然のことながら， BOUNCER 自身はフ。 
ログラムなどによって破壊されない安全な 
絶対アドレスに配置せねばなりません。 

J なぜリロケータブルにならないか 

マシン語プログラムが通常リロケータブ 
ルでないのは， LD , JP , CALL の3 つの コ 
マンドのせいです 。 「JP ( HL )」 を除いて， 
JP ， CALL は絶対アドレスにしか効きませ 
ん。600 Oh から始まるプログラム中に 「CALL 
6100 h 」 があるとしますね0このプログラム 
を800 Oh にロードしても ， 「CALL 6100 hj は 
「CALL 6100 hj のままで，810 Oh に変わって 
はくれません。 JP 命令も同様です。プログ 
ラムがないとこ ろへ ジャンプしたりコール 
したりするため暴走してしまいます。当然 
といえば当然です。 

思わぬ伏兵が LD です 。 「LD ( mO ， A 」 の 

nn も，ロードした アドレス によって変わっ 
てくれたりしません。自分自身を壊してし 
まうことだってあります。 （ BC )， （ DE )， 
( HL ) に対する LD だって同じことです。 

そこで BOUNCER の登土易です〇 BOUNCER 
をかませることにより，上記の欠点を取り 
除きリロケータブルなプログラムを作るこ 
とが可能なのです。 

JBOUNCER の使い方 

まずは LD への対応ですが，これは図1の 
ようにします。今まで WORK というように 
絶対番地を書いていたところを，次の命令 
の頭との相対番地 WORK - XX にしておきま 
す。すると，直前の 「CALL BOUNCER 」 
で，プログラムのアドレスに合わせて適正 
なアドレスに変換されるというわけです0 
図2を見てください0このようなアドレッ 
シングにも対応できます。 

JP 命令には図3のようにして対応します。 
ここでもやはり，ジャンプ先は相対アドレ 
リロケータブルのお話 143 


2H7H0H7H3H 55E 9H0HEH 
4689 ABCDIE1246 
QOOOOOOQ01111 

1 I 11 -Z I 

5BH4HAH6H1HFHCHDH9HFH3HFH 
4689ACCDE124B 
0OQOOQ 0001111 
5 4HJAHi4HSQH:9HJ9H:5HS4H:0H<FH:iBH!SH 
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HHHHHHHHHHHHHH 
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QOO 00000 Qltlll 
9HtEHiQHI3FHt 0 HIDHI6Hl 2 HtQHS6HI 5 2 HJBHSr 2 HI 

3 4789 ACDEF 1 34C 

1111111 
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Q0G00o^00illliM 
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ORQ 

RtLD 


HL,8 

(INST),HL 

(ADR) 


(RTN+1),HL 

< し DSP+1>,SP 
SP.SP18 


INC 

CP 

JR 


A , ( HL ) 

E,A 

HL 

0EDH 

Z,EXED 

0DFH 
0ODH 
Z.INDEX 


0CDH 

Z.CALLN 


0C フ H 

0C4H 

Z,CALLC 


108 I 
1QQ J 


nee eiQBB 

1100 001 OB 


i し D 


AND 

DEC 


A,D 

BCFH 

A 

Z,COMSET 

A,D 

0E7H 

22H 

NZ,EXIT 

(XNST),DE 
E,(HL) 


INSTRUCTION SET 


8000 

8QQ8 

8010 

8018 

8020 

8028 

8030 

8030 

8040 

8048 

8050 

8058 

8060 

8068 

8070 

8078 


HL 

D,(HL) 

(RTN-M) ,W 
HL.DE 
(ADR),HL 

DE 

AF 

SP,0 

HU.0 


A,(HL> 
D,A 
0C7H 
43H 

NZ，EXIT 


A,(HL) 

D,A 

0F0H 


SP,(LDBP+1) 


<LDBP+1>,S 
SP,(SP14) 
A.0C9H 
<RTN>,A 


RETURN ADDRESS SET 
RELATIVE ADDRESS SET 


PUSH RETURN ADDRESS 


: AD 
*C9 
：70 
:78 
:40 
:3A 
： 2A 
:E0 
:22 
:5C 

;95 
8 21 
:82 
: DA 
:6C 


SUM: A6 06 8A 8E F9 FI67 34 :49 

8080 18 BF 16 C5 7A D6 02 57 J5B 
8088 ED 7B 60 80 23 23 E5 2B s9E 
8090 2B ED 73 60 80 3E C9 32 : A4 
8098 69 80 18 B2 00 00 00 QO sB3 


SUM: 99 A7 0157ID 37 B0 B4 :50 


スにしておきます。 

最後に CALL ですが，もう手法はおわか 
りでしょう。図4です。これは， A が0の 
ときトライする方法ですが， BOUNCER の 
前後でレジスタは保存されるため，ただ 
「CALL BOUNCERj を挿入したた^けの形 
になっているところに注目してください。 

このように BOUNCER は使い方が非常に 
簡単なプログラムです。これだけでプログ 
ラムはリロケータブルになるのです0 

リストはとりあえず800 Oh でアセンブル 
しておきました。おもしろそうだなと思っ 
た方は試してみてください。 

その際，ソースを打ち込み，自分の好き 
なアドレスに BOUNCER を置いて使ったほ 
うが有効かと思います。 


図2 



し D 

HL , WORK 


し D 

( HL)，B 



ル 


CALL 

BOUNCER 


し D 

H し， W 0 RK-XX 


XX :し D 

( 

( HL),B 


) 

WORK : DEFB 

0 

図 3 


JP 

STEP 



si レ 


CALL 

BOUNCER 


JP 

STEP-XX 


XX : 



STEP : 



リスト 2 -A BOUNCER ダンプリスト 


図1 


し D 

( WORK ), A 


vl レ 

CALL 

BOUNCER 

し D 

( W 0 RK - XX),A 

xx : 


WORK : DEFB 

0 


OR 

A 

CALL 

Z , RETRY 


ル 

OR 

A 

CALL 

BOUNCER 

CALL 

Z , RETRY-XX 


XX : 
RETRY 


リスト 2 -B BOUNCER ソースリスト 


おもしろいアイデアですね。ただし， 
作者も述べていらっしゃるように速度は 
かなり遅くなってしまいます。やはり Z 
80においてリロケータブルに，というの 
は邪道なのかもしれませんね。 

すでに GETPC と [ HL ] が S -0 S にあり，こ 
れ以上リロケータブルプログラムのため 
のルーチンは必要なしとの判断から， 
BOUNCER を S - OS に組み込むのは見送ら 
せていただきます。 （編集室） 
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全機種(共通 I / O ポート, FM 音灝ポード ， S OS 要) 


ON OFF 



AT DT ST RT 


AT :アタックタイム 
DT :デイケイタイム 
SL :サステインレベル 
ST :サステインタイム 
RT :リリースタイ A 


音色作成&単音シンセサイザ 


FM 音源サウンドエディタ 


Taga Masakazu 

多画正数 


今回は BASIC 各機種版と S - OS 版のサウンドエデイタを発表します。データは共通ですか 
ら，どちらで作った音色データも次に発表するミュージックプレイヤーで活用できます。 
MZ / X 1 がシンセサイザに早変わり。 FM 音源の多彩な音の秘密を探ってみましょう。 


なぜ FM 音源と PSG とでは音が違うので 
しよう。それを知るにはまず「音の違い」 

とはどんなことなのかを知らなければなり 
ません。それはだいたい次の4つの要因の 
複合作用によって生じます。 

1) 音量 

音の大きさ，ボリュームです。 

2) 周波数 

音の高さ，音程です。 1) と 2) は PSG でも 
コントロールで きます〇 

3) エンベロープ 

音量の時間的な変化を表したもので，た 
とえばピアノなら立ち上がりの速い“ポ〜 
ン”という音， ハーモニカ ならわり とゆっ 
くりと立ち上がる“プゥ〜”という音にな 
ります。 

4) 音色 

これがいちばん説明しにくいものなので 
すが，ほとんどの人は耳で聴いてわかっ 
ていると思います。たとえば，同じ音程 
(高さ）の音でもピアノとバイオリン，トラ 
ンぺッ トなど エンべローフ。 の違いはあるに 
しても明らかに音の感じが違います。こ 
れが音色です。 

以上4つの中で FM 音源と PSG で大きく 
異なるのは エンベロープと 音色です。 これ 
らについて詳しく見ていきましよう。 

エンベロープ 

PSG にもエンベロープ回路はあります力 
FM 音源にはさらに細かいところまでコン 
トロールするエンべ口ープ回路が付いてい 


ます。 PSG では波形とそのサイクルしか指 
定できませんが， FM 音源ではアタックタイ 
ム，デイケイタイム，サステイン レベル， 

サステインタイム，リリースタイムと計5 
個の パラメータが あるのです（図1 )。 

これらはすべて音の鳴り方を示すもので， 
アタックタイムは音の鳴り始めから最大音 
量になるまでの時間，ディケイタイムは最 
大音量からサスティンレベルになるまでの 
時間です0サスティンレベルは，たとえば 
ピアノなら鍵盤を叩いたときの打撃音の次 
の音（言葉で表すなら“ポオ〜ン”の “ 才〜 
ン”の部分)，すなわち響きの部分の音の 
大きさを表します0サスティンタイムはそ 
の音が続く時間，リリースタイムはキーを 
離したあとの音の余韻の時間となります。 

これらをうまく組み合わせて設定するこ 
とで，今までの PSG のような粗いエンべ口 
ープから，細かい音の鳴り方の部分までコ 
ント ロールする ことができます。 

音色 

音色というのは音程（高さ），エンべロー 

図1 エンベロープ 


プ，音量が同じでも明らかに違う何かがあ 
るために生じます。ひとことで言えば，そ 
れは波形の違いということになります。 

ピアノ，バイオリン，トランペットなど 
あらゆる楽器の音には，基本となる周波数 
の音（基音）に加えて，その周波数が何倍 
かされた音（倍音）がたくさん混じってい 
ます。この倍音の混じり方，すなわち周波 
数成分が楽器によって違うのです。 

音の基本がサイン波であることは，すで 
に学校で習って いる 方も多いことでしよう。 
したがって，周波数成分の違いとはサイン 
波の組み合わせ方の違いであり，グラフに 
してみるとそれは波形の違いであるという 
ことができます。 FM 音源の最大の特長は 

図2 PSG の波形 



図3 いろいろな波形 


FM 音源と PSG 音源 
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この波形をコントロールできるということ 
にあります。 

まず図2を見てください。これが PSG 音 
源により出てくる波形です。 PSG は音色の 
コントロールは できませんので，、波形はこ 
れひとつだけです。しかし世の中の音には 
いろいろな波形があります。たとえば図3 
のような波形では，周期が同じでも音色は 
異なります。 PSG の矩形波なら“ポ〜”と鼻 
のつまったような音，サイン波なら音叉の 
ような“ポ〜ン”という音，のこぎり波なら 
“ビヤ〜ン”という明るい音となります。 

FM 音源ではこういった波形を作り出す 
ことができるので， PSG とは違った多彩な 
音が出せるというわけです。 


FM 裔源の仕組み 


話は少々難しくなりますが，ここで FM 
音源の仕組みについて説明してぉきましょ 
う。周波数変調については完全には理解し 
なくてもけっこうですが，オペレータセル 
とレジスタに関しては知ってぉいたほうが 
ょいと思います。 

周波数変調 

昔からあるアナログ シンセ というのは前 
に示したいろいろな波形を シンセ 本体に持 
っていて，ある一定以上または以下の周波 
数しか通さないというフィルタを使ってあ 
る波形に含まれている周波数成分を削るこ 
とで波形を変えて音を作っていました。し 
かし， FM 音源ではこれ以外の方式を使っ 
て波形作り（音色作り）をしています。 

FM 音源の FM とは Frequency modulation 
のことで周波数変調という意味です。 

周波数変調というのは周波数を次々と変 
化させることで，たとえばオシレータ（発 
振器）のつまみを手でくりくり変化させて 


やるようなものです。といっても実際に手 
で周波数を変えてやるわけではなく，モジ 
ュレータ（変調器）と言われるものでサイ 
ン波的に基本の周波数を変化させています。 
FM 音源では基本周波数とモジュレータの 
周波数が非常に近い （2 倍や3倍でも近い 
しいう）状態で周波数変調を行いますので, 
サイン波がゆがんで出てきます。サイン波 
がゆがむということはすなわち別の波形に 
なってしまったということですから，これ 
を スピーカに つないで音を鳴らすと音色が 
変化することになります。 

これが FM 音源での音色変化の中心的方 
法になっています。これを式に表すと 
F = Asin ( 6 +LsinM 

となります。 A は波形の振幅を表すもので 
音の大きさです。沒では角速度， t は 
時間ですからパは単位時間当たりの角度の 
変化量を示します。 L はモジュレータのサイ 
ン波の振幅で変調の深さ，つまりどれだけ基 
本の周波数をいじくるかということです。 
そして M は基本波形に対するモジユレーシ 
ョンの角速度の変イ匕ということになります。 

これを目で見るためのプログラムを BASIC 
で組んでみたのがサンプルのプログラムで 
す。まず試しに L =1， N = 2としてみてく 
ださい。すると多少デコボコがあるにして 
もなんとなく PSG の波形に近いものができ 
ます。これにいろいろ値を入れてやると元 
のサイン波がどれだけ変化するものかがわ 
かると思います。 

OPN ではこの基本的な変調を何回か繰り 
返したり，自分自身の波形で変調をかけて 
やったりしてさまざまな波形を作ることが 
できます。つまり，これらを上手に組み合 
わせて波形を作れば，ピアノの波形に近い 
音なども作れるということになります。 


図4 オペレータ 



オペレータセル 

OPN には FM 変調をかけるやり方などを 
変えて目的の音を出しやすいように，発振 
器とエンベロープジェネレータをひとつに 
まとめた オペレータセル（図 4) といわれる 
ものが1音につき4つ，3音なので計12個 
あります。音色作りには1音内で4つの才 
ペレータセルを使い， これらを上手に組み 
合わせて使うためのコネクトと呼ばれる組 
み合わせ パターンが 8種類あります（図5)。 
たとえば目的の音がかなり微妙に変化する 
独特な音なら変調数の多い NtxO や1,2など 
を使ったり，音色はそんなに微妙でな.いが 
それぞれ周波数の少々違った音を出してウ 
ナリを出したいときなどには Na 5, 6, 7など 
を使用します。 

OPN のレジスタ 

さて，実際に音色を設定するときは OPN 
の各レジスタに値を書き込むことで行いま 
す。それぞれのレジスタの働きを説明して 
いるとそれだけで何ページにもなってしま 
いますので，ここでは簡単にまとめたもの 
を表1に示しておくだけにします。シンセ 
サイザをかじったことのある人なら，これ 
だけでだいたいのことはわかると思います。 

この中で エンベロープ 関係のものは図1 
を見ればわかるでしよう。そのほかでは， 
Detune は 各 オペレータの 出力周波数に微妙 


サンプル FM 変調の波形 ( MZ -1 500/2000/2200, XI ) 


図5 オペレータの組み合わせ（コネクト） 



14〇 Oh! MZ 1986.1. 











































表 1 OPN レジスタ 



なズレを生じさせるためのもので ， Multiple 
は各オペレータが入力周波数の何倍の周波 
数を出力するかを決めるものです。 

さらに詳しく知りたい方は，ヤマハの 
OPN マニュアルか， MZ -2500, PC -88 SR ， 
FM の FM 音源カードのマニュアルを見せて 
もらうかなどしてください。いずれにして 
も，感覚で理解するしかなさそうですが。 


サウンドエディタ 


いよいよ今回のメイン， FM 音源サウン 
ドエディタの紹介です。これは， FM 音源 
の音色作成と同時に，パソコンを単音シン 
セサイザとしてこれだけでも十分楽しめる 
ものです。これで作った音色データはあと 
で発表するミュージックエディタ，ミュー 
ジッタプレイヤーで活用できるようにしま 
すので，使ってみたい音をたくさん作って 
おいてくださいね。 

フ。ログラムは BASIC 版とマシン語版で， 

マシン語版は S - OS を利用していますので 
全機種共通です。 BASIC 版はマシン語版に 
比べて少し機能が落ちています。 

マシン語版はサウンドエディタ（リスト 
3- A ) と音色データ（リスト 2) をそれぞれ 
入力してセーブしてください。音色データ 
は私が参考用に付けたものですから，不要 
な方は入力しなくてもけっこうです。サウ 
ンドエディタとデータ（なくてもよい）を 
ロード後， S-OS から AOOOh 番地にジャン 
プすれば，サウンドエディタがスタートし 
ます。 

BASIC はフ 0 ログ、 ラム（リ スト1 ) と必 、要が' 
あれば音色データ（リスト 2) を入力します0 
音色データは 990 Oh 番地からではなく C 800 h 
番地から入力してください。 

マシン語版と BASIC 版のデータ形式は同 
じですから，このようにアドレスを変更す 
るだけでデータは共有できるようになって 
います。 

使い方もほとんど同じですので，一緒に 
説明したいと思います。 

使用方法 

プログラムをスタートすると，画面に音 
色 NaO のデータが表示され，カーソル マー 
ク [] が 出てエディットモードに入りま 
す。ここでキーボードを使って音を出した 
り，カーソルを移動させて音作りをするこ 
とができます。現在 S - OS ではカーソルキ 


一がサポートされていませんので，カーソ 
ル移動はメインキーで行います。キー操作 
は図6にまとめておきます。音色データは 
38個まで扱うことができます。 

BASIC 版の場合，1度音を出すとスペー 
スキーを押すまで止まりません。マシン語 
版では N キーを押すことによりこれをコン 
トロール することができます。 モー ドの表 
示はオクターブの横の記号で，キーボード 
を押しているときだけ音が出る「.」（ピリ 
オド），1度押すとスペースを押すまで出た 
ままになる「一」， OPN の各パートを順番 
に使う「+」， OPN #0 だけ使う「0」が切 
り替わります。 

エディツトモードでリターンキーを押す 
とメニューが出ます 0カーソルを 上下させ 


てリターンキーを押せば，それぞれの メニ 
ューを実行することができます（表2)。こ 
の中で BASIC 版でサボートしているのは 
NEIRO と NAME だ、けです。 BASIC 版でデ、 
—夕の SAVE , LOAD をしたい場合は，プ 
ログラムを中断して，モニタなどで各自行 
ってください0データのアドレスは C 800 H 〜 

CDEFh です 。 

エディットモードで表示されるデータの 
内容は，表1のレジスタの内容の省略型に 
なっていますので，慣れるまではそちらを 
見ながらやってください。 

LFO について 

OPN には LFO (低周波発振器：ビブラー 
卜などに使う）がないため，マシン語版で 
はタイマ A を使用して割り込みを発生させ， 

fm 音源サウンドエディタ 147 















































図 6 エディットモードのキー操作 


UU 0 m 0 LZJ UJ 回 

一林ラ 林ド林レ #ファ林ソ社ラ +井ド 

回 ® 回 ㈤ 0m0 □ 凶 0 

-ン ドレミファソラシ+ド+レ 


囚 LU 回 0 

+1 +1 +5 +1 

[U m 回 0 

-1 - 1-5 -1 


E 

0 B □ □ 


オクターブ データ 


SPACE 


カーソル 


[C R 

メニュ- 


音ストップ 


表2 メニュー 


NEIRO 

データメニューにジャンプします。カーソルを移動してリタ 


ーンキーを押し，音を選びます。 

NAME 

現在エディット中の音に名前を付けたり，変更したりします。 


名前は10文字までです。 

l_OAD 

音色データをロー ドします。 

SAVE 

ファイルネームを入力してリターンキーを押すと，音色デー 


夕をセーブします。 

COPY 

音色データをコビーします。転送データ，転送先の順に選ん 


でリターンキーを押します。 

EXIT 

S - OS に戻ります。 


ソフト白勺に LFO をっています。 LFO での 
変調は三角波によるもののみで，かけられ 
るものは基本周波の卜ータルレべル（音の 
大きさ）と周波数のみです。パラメータは 
4つあり，第1が周波数にかけるか音量に 
力 Mt る:^の FN / TL 切り替えで，0で周 i 皮数, 
1で音量となります。第2は音の鳴り始め 
からどれだけ時間がたってから LFO を作動 


させるかという S . WAIT で，0で最小，255 
で最長となります。第3は DEEP で，どれ 
だけの•深さの変調をかけてやるかをこれで 
決めます。変化量は〇〜125までで,0で LFO 
OFF となります。第4は STEP で，変調の 
深さを何回の割り込みで1ずつ•深くしてい 
くかというものです。つまり LFO の周波数 
は DEEP とこの STEP によって決まります。 


単音シンセサイザですがこのままでも十 
分楽しめるものと思います。できるだけい 
いアンプと大きなスピーカにつないで FM 
サウンドを味わってください。なるべく近 
いうちにミュージックエディタとミュージ 
ックプレイヤーを発表する予定です。その 
ための音色データもしっかり貯えておきま 
し上ラ0 


:ディタ （ BASIC 版） 


10 REM 拿本本本本本本本本本本本本木本本本本 

11 REM オイ □ •: T クリフ 0 □7 '* ラ厶 

12 REM 

13 REM BY M.TAGA 

14 REM 本 ** 拿拿木本本本 * 本本木本本拿 ** 

15 REM 

20 C し SJC し RsRESTORE 

30 DIM D(3,10),F<1,16),K(90) 

40 REM KEY CODE READ - 

50 FOR 1=0 TO 90:K(I >=255: NEXT 
60 FOR 1=0 TO 29 

70 READ A ： K<A)=I 

71 K(A)=I 
80 NEXT 

90 REM QNKAI DATA READ - 

100 FOR 1=0 TG 16 
110 READ F(0,I),F(1,I) 

120 NEXT 

130 N0=0 ： DA=$C800 

200 REM ========== 

201 REM CRT MAKE 

202 REM ========== 

203 REM 
210 C し S 

220 CURSOR 2,1 SPRINT n N0." ； N0 

230 PRINT TAB(12)；"1 2 3 4" 

240 PRINT " CONNECT •• 

250 PRINT " F.BACK .. 

260 PRINT " MU し IP し E" 

270 PRINT *' T • し EVE し ， _ 

280 PRINT " A.RATE" 

290 PRINT " D.RATE" 

300 PRINT •• S-RATE'* 

310 PRINT " S,LEVEL" 

320 PRINT " R.RATE" 

330 PRINT " DETUNE" 

340 PRINT •• K. SCALE" 

345 CURSOR 1,20:PRINT"OCT" 

350 A=DA+NO 拿 40 

360 CURSOR 15,1:FOR 1=0 TO 9 

362 B=PEEK(A)：IF B<*20 THEN B=»20 

364 PRINT CHR»(B) ；： A=A+1 ： NEXT8A=A+1 

370 FOR 1=0 TO 3 ： B=PEEK<A) ： A=A+1sQ=INT<B/B) ： R=B-Q*8 ： D(I,21 
=fR ： D(I,9)=Q：NEXT 


4)=R：D(I,10)=Q：NEXT 

400 FOR 1=0 TO 3 ： B=PEEK(A) ： A=A+1 ： D(I,5)=B：NEXT 
410 FOR 1=0 TO 3 : B=PEEK(A)s A=A+1 ： D(1,6)=B：NEXT 
420 FOR 1=0 TO 3:B=PEEK(A>:A=A+1sQ=INT(B/16>:R=B-Q 拿 16:D(I, 
8)=RiD(I,7)=Q：NEXT 

430 B=PEEK(A)：Q=INT(B/8)：R=B-Q*8:D<0,0)=RsD<0,1)=Q 
440 FOR 1=1 TO 10»B=D(1,I)*D(1,I)=D(2,I)sD(2,I)=B：NEXT 
450 X=0：Y=0：G0SUB 5000：G0SUB 5400 
460 X=0：Y=1：G0SUB 500 0:G0SUB 5400 

470 FOR X=0 TO 3:FOR Y=2 TO 10：G0SUB 500 0:G0SUB 5400： NEXT； 
NEXT 

480 X=0：Y=0：0=4：CURSOR 7,208 PRINT 0 


490 GOSUB 5200 

500 REM =========== 

501 REM KEY INPUT 

502 REM ============ 

503 REM 

510 GET A* ： A=ASC(A$) 

520 IF A>90 THEN 510 
530 A=K(A) 

540 IF A<17 THEN 600 

550 ON A-16 GOTO 700,750,810,820,830,840, 500, 1100, 1600,120 
0,1300,1400, 1500 
560 GOTO 510 

600 REM =========== 

601 REM QNKAI KEY 

602 REM =========== 

603 REM 

610 0UT90,$A4=0UTS)l,F<0,A>+8 拿 0 
620 0UT30,*AO : OUT01,F <1,A > 

630 0UT30, ¢28 ： 0UTS>1,$0 ： 0UTS1,*F0 
640 GOTO 500 

700 REM ======== 

701 REM OCT UP 

702 REM ======== 

703 REM 

710 0=0+1：IF 0=8 THEN 0=0 
720 CURSOR 7,2 0:PRINT 0 
730 GOTO 500 

750 REM ========== 

751 REM OCT DOWN 

752 REM ========== 

753 REM 

760 0=0-1：IF 0=-l THEN D=7 
770 GOTO 720 

800 REM ============== 

801 REM DATA UP DOWN 
SO^ REM SSSSSSSSSSSSSCSSSSS 
803 REM 

810 D=1 ： B0T0 850 
820 D=-isGOTO 850 
830 D=5 ： B0T0 850 
040 D=-5 ： G0T0 850 

日 50 ON ,Y+1 GOTO 860, B60,870,880,890,890,890,870,870,860,900 

860 し M=7:G0T0 910 

870 し M=15:G0T0 910 

880 し M=127:GOTO 910 

890 し M=31:G0T0 910 

900 し M=3:GOTO. 910 

910 D < X,Y)=D < X, Y)+D 

920 IF D<X,Y)<0 THEN D(X,Y)=D(X,Y)+LM+1 
930 IF D(X,YJ>LM THEN D(X,Y)=D(X,Y)-LM-1 
940 GOSUB 500 0:GOSUB 5400 
950 GOTO 500 

1100 REM ========== 

1101 REM OTO STOP 

1102 REM ========== 

1103 REM 

1110 0UTS0,*28 ： 0UT31,0 
1120 GOTO 500 
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1201 REM CURSOR UP 

1202 REM =========== 

1203 REM 

1210 GGSUB 5300 
1220 Y=Y-1 

1230 IF (Y=-l)+<Y=l)*(X>0> THEN Y=10 
i240 GOSUB 5200 
1250 GOTO 500 

1 300 REM =========：===：=： 

1301 REM CURSOR DOWN 

1302 REM ============= 

1303 REM 

1310 QQSUB 5300 
1320 Y=Y+1 

1330 IF (X=0)*(Y=11)THEN Y=0：G0T0 1350 
1340 IF Y=ll THEN Y=2 
1350 GOSUB 5200 
1360 GOTO 500 


1401 REM CURSOR LEFT 

1402 REM ============= 

1403 REM 

1410 IF Y<2 THEN 1460 
1420 GOSUB 5300 
1430 X=X-1 

1440 IF X=-l THEN X=3 
1450 GOSUB 5200 
1460 GOTO 500 

1500 REM ============== 

1501 REM CURSOR RIGHT 

1502 REM ========：===：=== 

1503 REM 

1510 IF Y<2 THEN 1560 
1520 GOSUB 5300 * 

1530 X=X+1 

1540 IF X=4 THEN X«0 
1550 90SUB 5200 
1560 GOTO 500 

1600 REM ====== 

1601 REM MENW 

1602 REM ====== 

1603 REM 

1610 GOSUB 5300 

1620 CURSOR 20,16：PRINT"1：NEIRO" 
1630 CURSOR 20,17：PRINT"2：NAME" 
1640 GET A：IF A=0 THEN 1640 
1650 IF A=1 THEN 1900 

1660 IF A=2 THEN 1800 

1670 CURSOR 20,1 6:PRINT" " 

1680 CURSOR 20,17:PRINT" •• 

1690 GOSUB 5200 
1700 GOTO 500 

1800 REM ====== 

1801 REM NAME 

1802 REM ====== 

1803 REM 

1810 CURSOR 20,16：PRINT" •• 

1820 CURSOR 20,19：INPUT A* 

1830 A*DA+N0*40 


1840 FOR 1 =1 TO10： POKE A, ASC<MID«( A*+" '*,1,1)) 

：A=A+1：NEXT 

1850 CURSOR 15,1：PRINT し EFT»(A$+ M 'M0> 

1860 CURSOR 0,16: FOR 1 = 16 TO 23s CURSOR 20,1 : PRINT SPC(19 


)：NEXT 

1870 GOSUB 5200 
1880 GOTO 500 

1900 REM =*===== : 

1901 REM NEIRO 

1902 REM ==sss«*s=：=s 

1903 REM 
1910 C し S 

1920 Y=2：PP=11：GOSUB 5500 sREM MULTIPLE 
1930 Y=3：PP=15：GOSUB 5500：REM T- し EVEL 
1940 Y=4：PP=19：G0SUB 5500：REM A.RATE 
1950 Y=5：PP=23：GOSUB 5500 sREM D.R. 

1960 Y=6：PP=27：GOSUB 5500：REM R. 

1965 Y=* フ spp=31:G0SUB 5500： REM S •し. 

1970 X=OsY=0!B0SUB 500 0:POKE DA+NO*40+35,OD 
2020 CURSOR 16,11 PRI NT " ======= •' 

2030 CURSOR 16 ,2SPRINT" NEIRO " 

2040 CURSOR 16,3 * PR I NT n =-===== *• 

2050 PRINT" NO. NAME NO. NAME" 

2060 A=DA 

2070 FOR J=0 TO1 

2080 FOR 1=0 TO18 

2090 CURSOR 5+、T 本 17,5+1 

2110 PRINT RIGHT* (" "+STR* < I+J 家 19> , 2> ; 

2120 FOR 11=0 TO 9 

2122 JJ=PEEK(A)：IF JJ<*20 THEN JJ=«20 
2124 PRINT CHR«(JJ)； 

2126 A=A+1：NEXT 
2130 A=A+30 
2140 NEXT：NEXT 

2150 CURSOR 10,24 sINPUT.NCUIA 
2160 A=INT(ABS(A))：IF A>37 THEN 2050 
2170 NO=A 

2180 FOR 1=0 TO18 
2190 GOTO 200 

5000 REM = 3 =====*：==：============ 


5001 REM DATA WRITE 

5002 REM X,Y；DAT NO SET 

5003 REM OD ；OPN WRITE DATA 

5004 REM ===================== 

5005 REM 

5010 ON Y+l GOTO 5020,5020,5030,5040,5050,5040,5040,5060,50 
60,5030,5050 

5015 STOP , 

5020 P=*B0：0D=D(0,0)+D(0,1)*8：GQT0 5070 
5030 P=«30 : OD=D(X,0)+D(X,9)*8：GOTO 5070 
5040 P=*iO«(Y+nsOD=D(X,Y〉：GOTO 5070 
5050 P=$50:0D=D<X,4)+D<X,10>*64:(30T0 5070 
5060 P=*80:0D=D<X,7><a6+D<X,8>:S0T0 5070 
5070 ON X 十 1 GOTO 5080,5090,5100 ,5110 
5075 STOP 

5080 PX=OsBOTO 5120 
5090 PX=8：Q0T0 5120 
5100 PX=4：B0T0 5120 
5110 PX=12：G0T0 5120 
5120 OUT0O,P+PX：OUT01,OD 
5130 RETURN 

5200 REM ===================== 

5201 REM CURSOR SET 

5202 REM X,Y；CURSOR ADR 

5203 REM ================= 

5204 REM 

5210 CURSOR iO+X*5,3+Y：PRINT"C" 

5220 CURSOR 14+X*5,3+Y：PRINT"3 H 
5230 RETURN 

d 300 RFM ===：============== 

5301 REM CURSOR RESET 

5302 REM X,Y；CURSOR ADR 

5303 REM ================== 

5304 REM 

5310 CURSOR 10+X 本 5,3+Y:PRINT" •• 

5320 CURSOR 14+X*5,3+Y:PRINT"" 

5330 RETURN 

5400 REM : ===============*= 

5401 REM DATA PRINT 

5402 REM X,Y5CURSOR 

5404 REM ================ 

5405 REM 

5410 CURSOR 11+X*5,3+Y 

5420 PRINT RIGHT*(" "+STR*(D(X,Y) >,3) 

5430 RETURN 

5500 REM ========== 

5501 REM KAKIKOMI 

5502 REM ========== 

5503 REM 
5510 X=0 

5520 AA=DA+N0*40 
5530 FOR 1=0 TO 3 
5540 GOSUB 5000 
5550 X=X+2 
5560 IF X=4 THEN X*1 
5570 POKE AA+PP+I,0D 
5580 NEXT 
5590 RETURN 

10000 REM =============== 

10001 REM KEY CODE DATA 

1 0002 REM ssssssssssrssssszssssssesss: 

10003 REM 

10010 DATA 49,81,87,51,69,52,82,84,54,89 
10020 DATA 55,85,56,73,79,48,80,65,90,83 
10030 DATA 88,68,67,78,32,13,75,44,77,46 

10050 REM =rss==s=s==ss:=sss====s=：s==ss= 

10051 REM C,D,E," NO DATA 

10052 REM ================== 

10053 REM 

10060 DATA 2,38,2,71,2,105,2,142,2,181,2,222 
10070 DATA 3,10,3,56,3,105,3,157,3,212 
10080 DATA 4,14,4,76,4,141,4,211 
10090 DATA 5,28,5,106 


♦ SP- 5030 用変更点 

610 0UT#0,*A4：OUT#1,F(0» A)+8*0 
620 DUT#0,*A0:0UT#1,F( 

630 0UT#0, ¢28： 0UT#1, ¢0： 0UT31,$F0 
1110 0UT#0,*28s0UT 轉 1,0 
5120 0UT#0,P+PX s OUT#1,OD 


參 HuBASIC 用変更点 

130 N0=0：DA=&HC800 

362 B=PEEK(A) ： IF B<S<H20 THEN B=&H20 
610 OUT (0),&HA4：0UT (1),F(0,A)+8*0 
620 OUT <0),&HA0：0UT (1),F<1,A) 

630 OUT (0),S<H28：aUT (1),&HO：OUT < 1),&HFO 
1110 OUT (0),&H2B：0UT (1),0 
2122 JJ=PEEK<A) ： IF JJ<8cH20 THEN JJ=&H20 
5020 P=&HS0i0D=D<0,0>+D<0,i)*8:G0T0 5070 
5030 P=&H30:0D=D<X,0>+D(X,9>*8:G0T0 5070 
5040 P=8«H 10* (Y+1)： OD=D ( X, Y ) ： GOTO 5070 
5050 P=&H50 : OD=D(X,4)+D < X,10)*64：GOTO 5070 
5060 P=S<H80 : OD=D ( X, 7) * 16+D ( X, 8) ： GOTO 5070 
5120 OUT (0),P+PX：OUT <1),OD 
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00 

00 

OD 

00 

00 

00 

00 


53 

AF 

33 

Cl 

68 

27 

00 

00 

00 

68 

27 

00 

00 

00 


SUM ： フ 4 B8 B7 B3ID 6A C7 30 


SUM ： 8F 65 36 El2B F9IF 1C ： 6A 


02 V D3 4161 EO CD IB ED :2C 




AOOO 

C3 

32 

AO 

C3 

41 

AO 

CA 

AB 

: AE 


A028 

IF 

C3 

A6 

IF 

C3 

A3 

IF 

C3 

: EF 


A050 

3E 

OD 

77 

19 

10 

FC 

21 

78 

:80 

A008 

C3 

00 

00 

C3 

F4 

IF 

C3 

F4 

：50 


A030 

9D 

IF 

21 

00 

99 

36 

00 

11 

: BD 


A058 

IF 

5E 

23 

56 

D5 

DD 

El 

CD 

s56 

A010 

AD 

C3 

E8 

IF 

C3 

EE 

IF 

C3 

:0A 


A038 

00 

99 

13 

01 

FO 

05 

OB 

ED 

： 9A 


A060 

17 

AO 

7C 

FE 

00 

CA 

81 

AO 

: 1C 

AO10 

F7 

IF 

C3 

FI 

IF 

C3 

D3 

IF 

： 9E 


A040 

BO 

CD 

7B 

AB 

AF 

32 

67 

AC 

••97 


A068 

FE 

01 

CA 

99 

AO 

FE 

02 

CA 

: CC 

A020 

C3 

AF 

IF 

C3 

AC 

IF 

C3 

A9 

： 8B 

I 

A048 

21 

OA 

99 

11 

28 

00 

06 

26 

：29 

_ 

A070 

BC 

AO 

FE 

10 

CA 

A1 

AO 

FE 

：73 


150 Oh! MZ 1986.1. 


► 1 ■それ行け/ Xla の読者の方々， Vol . 7の P .26 の上の方に載っている名前の10番目を 
よ一く見てください。それがばくです。モニタになっちやった。それだけのことでした。 

森本雄一郎 （16) 大阪府 


卜2 音色データ （BASIC 版で使うときは C800 h 番地から入力) 


217347681093DE1B97S189601D32AEE 


16F10DBF 2 0 C6A4OD 
401000 0 05040 OAOO 

41820002707 BF300 
5 3 0 0 0 2 5 4 10 4 3 10 0 2 

0 3 3409 B6800FF309 
2 3 0 0 0 2 0 4 10 2 3 10 0 4 


D8009D6C 69034 8FD 
011A4040F5021E40 

DC 966 DF 718 DCE8BD 
010150107501 0F40 


C65DB4C1D 5 651 D02 
004020340 3 0140 2 0 

2 6 2 D 4 4 3 8 D 8 D 5 8 D 3 8 
OF 40 2 0040 2 014030 


EA1E9FB78D14 2AE8 
8B 3 B28C 280 A 5 5 AOE 



4CSB6A90D:^98CB5A46BAF707FE5D 


01027026 A 70 DA 9 5 0 
0 3 2000 3 204002 OEO 

00020006900 D1FOO 
021900205000 0800 

OEO 200 ECE 2001000 
0469004050023 Doo 

0140001220052400 

0479004110040500 

F 7840474 2 2 C42F 3 B 
1479004190157 D03 

F 2 0426 2 DF595D048 
0501005010050100 

FFD625FD469CD7B5 
0402004020140202 

Foo 5 2 7000486 D 575 
o 5 2 2 o o 5 2 2 o 040 3 OF 


3 2FB 466 3 2 SF5DC7B 
6 3 7 D 161o F 5 D 2 8 3 2 9 



































CD 11 : FE 
AC CD : AA 
ID AD :0D 
113B :4B 
AO11 sBD 
14 AO : FI 
CD 14 :6B 
AO CD : FF 
11 AO s4E 
CD 11:83 
AD CD sIB 
77 AD :67 
117F :8F 
AO11 : BD 
14 AO :34 
CD 14 :A9 


A500 

A510 
A518 
A520 
A528 
A 530 
A538 
A540 
A548 
A550 
A558 
A 560 
A568 
A 570 
A578 


A 300 
A308 
A310 
A318 
A320 
A328 
A 330 
A338 
A340 
A348 
A 350 
A358 
A 360 
A368 
A370 
A378 


A 200 
A208 
A210 
A218 
A220 
A228 
A 230 
A238 
A240 
A248 
A250 
A258 
A260 
A268 
A 270 
A278 


SUM: 

A280 
A288 
A290 
A298 
A2A0 
A2A 日 
A2B0 


A680 0015 
A688 A6 3E 
A690 FF B8 
A698 50 A6 
A6A0 OB AO 
A6A8 A6 06 
A6B0 A5 DD 
A6B8 0011 
A6C0 36 00 
A6C8 CB AD 
A6D0 78 32 
A6D8 DD 36 
A6E0 49 A6 
A6E8 67 AC 
A6F0 29 E5 
A6F0 9919 


A 600 
A608 
A610 
A 618 
A 620 
A628 
A630 
A638 
A640 
A648 
A650 
A658 
A660 
A668 
A670 
A678 


A5B0 AC 06 
A588 011A 
A 590 1310 
A598 CD A5 
A5A0 67 AC 
A5A8 OB AO 
A5B0 0101 
A5B8 DD 36 
A5C011 B1 
A5C8 0010 
A5D0 AD CD 
A5D8 DD 36 
A5E011 AO 
A5E8 AD CD 
A5F011 DF 
A5F8 00IB 


05 

3E 

OF 

B8 

20 

CE 

A3 

IB 

I：A 

DB 

36 "00 

T4 

23 

01 

3E 

20 

CD 

OB 

AO 

24 

16 

B8 

20 

B8 

06 

10 

FE 

78 

FE 

11 

CA 

4B 

A5 

OD 

CA 

98 

A5 

FE 

12 

CA 

EF 

FE 

13 

CA 

17 

A7 

FE 

B7 

AE 

A6 

C3 

08 

AO 

CD 

6A 

CD 

71 

A8 

CD 

94 

A8 

2D 

A2 

DD 

36 

00 

15 

DD 

B2 

15 

11 

AC 

AD 

CD 

11 

94 

71 

A8 

DD 

36 

01 

16 

BO 

A7 

DA 

3F 

A5 

D5 

DD 

91 

OF 

DD 

36 

01 

01 

11 

6B 

CD 

11 

AO 

D1 

DD 

36 

E2 

DD 

36 

01 

01 

2A 

61 

AF 


A480 
A488 
A 490 
A498 
A4A0 
A4A8 
A4B0 
A4B8 
A4C0 
A4C8 
A4D0 
A4D8 
A4E0 
A4E8 
A4F0 
A4F8 


A400 

A408 

A4i0 

A418 

A420 

A428 

A430 

A438 

A440 

A448 

A450 

A458 

A460 

A468 

A470 

A478 


A 380 
A388 
A 390 
A398 
A3A0 
A3A8 
A3B0 
A3B8 
A3C0 
A3C8 
A3D0 
A3D8 
A3E0 
A3E8 
A3F0 
A3F8 


A 100 
A108 
A110 
AU8 
A120 
A128 
A130 
A138 
A140 
A148 
A150 
A158 
A160 
A168 
A170 
A178 


A080 AO 
A088 EO 
A090 AB 
A098 AO 
AOAO EO 
A0A8 3E 
AOBO 79 
A0B8 5E 
AOCO 99 
A0C8 00 
AODO 7D 
A0D8 54 
AOEO 00 
A0E8 5E 
AOFO OB 
A0F8 01 


SUM: 9B BD 77 52 EC 82 29 FD 


SUM: 231C 44 41 EE F8 ED 63 


SUM: 27 36 83 73 EF 06 2A B7 


SUM:15 B5 C5 86 2B 12 2F 50 :D1 


SUM: 47 83 OE 94 DF FD 78 53 : 13 


B5 

AA 

3A 

FD 

7D 

79 

El 

2A 

3A 

00 

24 

43 

81 

8B 

54 

2D 

03 


SUM:1A EE C9 716C 27 5E 5F :92 


SUM: A4 B6IB EA 16 CD D818 :32 


FA 

6 ? 

FB 

54 

AC 

96 

95 

FO 

00 

61 

7A 

21 

45 

1C 

51 

E5 

22 


29 

5C 

D9 

E9 

69 
64 
EE 
EC 
7A 
BD 

70 
00 
66 
E4 
91 
5A 
59 


A2B8 

A2C0 

A2C8 

A2D0 

A2D8 

A2E0 

A2E8 

A2F0 

A2F8 


SUM: 93 A3 BF 2B 48 09 5C C7 :94 

A180 AO1193 AD CD 11 AO CD :3C 
A18814 AO119B AD CD 11 AO •• 8B 
ffl90 CD 1^ AO11 A1 AD CD 11 : BE 
A198 AO CD 14 AO CD 14 AO11 : B3 
A1A0 A7 AD CD 11 AO 3A 67 AC : IF 
A1A8 26 00 6F 29 29 29 E5 29 : IE 
A1B0 29 D1191100 9919 22 : F8 
A1B8 61 AC 3E 04 32 65 AC DD :6F 
A1C0 36 00 07 DD 36 0114 3E sA3 
A1C8 34 CD OB AO DD 36 00 09 :C8 
A1D0 DD 36 0114 3E 2E CD OB :6C 
A1D8 AO 3E 30 CD OB AO AF 32 :67 
A1E0 5E AC 32 5F AC 32 63 AC :88 
A1E8 32 66 AC F5 CD 21 AA 00 :D1 
A1F0 47 CD 19 A9 FI3C 32 5F :94 
A1F8 AC FE OF 20 EE 06 0178 :46 


SUM: E2 DA 34 C3 9? 9A FF 6A : 4D 


SUM: 94 C2 OE 28 C9 FB 9A 49 :33 


A07811 CA C2 AO FE 20 CA C8 sED 


SUM ： B9 8B F8 EB 33 01 C8 32 ：55 


SUM:13 AA 89 812A EE 8F 15 :83 

A700 00 29 29 29 E5 29 29 D1:83 
A708191100 9919 D1 EB 01 s99 
A710 28 00 ED BO C3 EC AO CD : El 
A718 97 A7 DD 36 0015 DD 36 :79 
A720 011011 E7 AD CD 11 AO ; 34 
A728 CD 1A AO11 AC AD CD 11 : CF 
A730 AO CD 71 A8 DD 36 0111 : AB 
A738 CD AD A7 DA 3F A5 3E 01 : IE 
A740 CD 2C AO FD 2A 74IF FD :50 
A748 3611OD 2100 99 22 70 : AO 


SUM: 58 06 E2 F9 F7 E4 C7 70 :4B 


►ウーン，困った。ど一しよ 一。 年末にアルバイトしたお金で，さて何を買おうか。候補 
その1， MZ -1 P 17 を買う。その2， I / O ボックスを買って FM 音源ボードを製作する。そ 
の3， I / O ボックス+漢 ROM + New BASIC を買う。その4，安い CD を買う。と，「とらぬ 
たぬきの皮算用 j をしている私でありました。誰か何を買えばいいのか教えてください。 

高杉淳 （15) 東京都 


FM 音源サウンドエディタ 1^1 


CF104D01DDF10 4D0 
AF 1 A 1 CA 1 CA 61 A 1 CA 

2 104D01DD 610 4 Dol 
E1A1CA 1 CA 61 A 1 CA 1 

1 D 
1 C 

04D0 1DD 6104 DOIDD 
A1CA1CA 51 A1CA1CA 

4D01DDE10 4D01DDC 
1 CA 1 CA 41 A 1 CA 1 CA 8 

DOIDD 5104 DOIDD 81 
CAlcft 41 AlcAlcft 81 


104 D01DDE104D0 
1A1CA1CA 51 A 1 CA 


2E1 15B17394C5D S 074E5634FE138DBE 



FF86DD0B S 06AC83 S C1A8FE S FFC300 


EC 7026074 ABCCEC6 
3AOCAO? 80 A83AFA 3 

2 50688 1F81DC7D 7 D 
A608412 53 2CA636D 

8160315 OFD972C2 8 
4233 coo 0 3CA63A3A 

3IDE 8666859 AF75A 
C0D3A0 0 1CC13A62A 

CE74 1 A 2 CE8D21AED 
A 3 7170 0A7FCA033C 

62 7 1 D 88 F 98780020 
6000 cll 5114 4 2 AOA 

2 866 0 FBAFO 0 3 6COC 
31E3AFF 3 52 8 C2E2E 


8 3 5 2 D6C- 26C 5 D C66 o 
2 2 A 3 c 3 A o 3 E o c A 1 3 A 

0-DF8CD11D1DC10D1 
2 o 3 7 o D 1 o D 1 o A 1 o D 1 

E036E0D6036FA6 0D 
3ACA 3 1C3A03D03AC 

9BD 900 DDIIDIODID 
B0 0 4A0AD10D1.0D1A 

FD6DC6C1D 6046 0 DC 
AC3CE3E1C3A03ACA 

A7053D10DD11D1C1 
0 7 FACD1 0AD10D1A1 


940D24AD4E4DF9CD 

A89DE8FB8AF16E68 

DD11D1DDD1B10C6D 
AD10D10AD18 0A13C 

16 D 603616 DDOE8DO 
B1C3A13C1CC 7 0202 

10DD11D10D8DDC0E 
ioadiodioaadc 2 E3 

06c 606046614 OEB 1 
13A1C3A13C71AF10 

IDIODDIIDIDOBAEO 
0D10AD10D1C000 27 

601676 D 60506 D88D 
5A13B1C3A113C22D 

D11D10DD116DEBD4 
DIODIOADIOOD 3401 

6D60 2 6C6D608EEE0 
1C3A13B1C3AA3FFO 


C74608C77024FD703D73AE51F9BFD31C 



0 CE0 0EECA0 37EC3A0 


21 3 2 D 6 o o 1 7 0 D 0 c D 1 
3 2 c 3 7 o o o A 4 o E o o D 1 

o o 6 o 1 E 9 o 3 D 9 3 4 E 2 D 
B15B03 70CE7F53 0C 

E8DE 7 0 DOOODE 2 Boc 
33E 340 EOO0E32FOA 

02 0 0 
0 3 10 

0 3900 DECOOE9ACD1 
0C3 0AE3E0037CED1 

0 E 2 0 EFO 3000 D1 301 
o 3 2 034 o 匚 A OOE 2 CA o 


S79F3A0003E4F00ABA036DF 


04 o E 4 o 7 A 7 81 D D o D F 
A" 173B1ACA40CA0A0 

B/0D48E 94 7 36 OD63.U 
o O D o 1 F 7 1 9 c 3 A c 3 D o 


067 16060 coo 9019 A 
o 5 5 060 c o A o 070 2 1 2 

63 2 FA2FA60 0D9FC? 
1 2 B 6 3 o 376 0 o E 7 AA7 

7E 7 7 2 1B3AOOODF59 
8 5 8 8 rf o C03 o o o E 5 2 1 

2 97C 3 5 o o B o o o O o 1 c 
Al8 A 2 o o o o o o o 002 A 

8C I 38090000 0 67 F 
4A 8672070 Aoool 71 

3DCA9 7 1D96DOBC91 
CBA 3040 E7CO07A1 2 

cl 5 0 CB3 3DFOO 3 6CC 
A 2 60 ACOFE 300 0 6 A3 

6FA67C840B000A37 
6 5 3 2 o A 1 A o coo o 3 1 7 


6 D14DE 87 0 CA4B9DA 
51B 23 7 FC5CB18DA1 

FDOA6DD 282 0 A734F 
5 c 2 33 DE3A 3 OD8CA2 

2 790DF1F4901F9B3 
34BEDOOA9F2 15E2C 

90B04E7 0D81E0934 
7 o o 2 o 37 A c 2 o F o 1 C A 

2 A E 8 o 8 D 1 c o c 9 6 243 
OA3BOAD1AOA71AA3 

E1C46D1DFECC1F6 3 
020 0 3 Docs FBE160C 

CD1EDDEC 2 0106134 
ACC3DC3A3A2 2D2CA 

E594C101CEC93F4 7 
5 CA0A006A0ABA5A 2 

2C9C717BED4D53A3 

3 A 1 E6075 5 C6E 080 c 


7 5 871 D 3 8 
D 5 o 5 9 A 1 9 

9 3 4B9CC 2 

8 CA 503 AO 

2 8 A 3 o c 3 8 
A A 7 c o A 61 

1 7 3 263 2 D 
74C A 3 63 2 

8 3 8 c DAF E 

9 CA9D3A3 

E 7 D 34 4 1 4 

6 AlcAloo 

D 2 3 2 A 1o 8 

7 D cA60 2 2 

A 3 7 3 3 6 4 1 
c CADC 300 

E 4834 DE6 
EAFCADFE 


6BBF5DFFDDD7 S DF63B2D43435735B79 



6B3EC3CD50A501 請 I1A604CD32290026 


D5502D 60190889 IF 
C0 2 2CC3A040A 7 216 

906E86D11D6DF09C 

CA03BAD10C3D401A 

IB 66605 D60DDC617 
OOAA 250 C3ADCA 2 D6 

7D0BE30DD1C17F9A 
7C563COAD1A 06623 

Do 2 04066 7 07 1A 995 
D2CC0 03C0C 6037 2 E 


30 S 46 BE C 6 50A9 17 7043 D2 S DD1B B7 04 



00363ADDDDCD S 04C6A8A04B0D0BDD36 


1DEODB 9101 BEE84D 
1D3ACE1E 2 7 0 FF30D 

5B 8100 0 B8DD 0 4800 
0EA18A0EBCCA3B08 

19DD3B 893 7 EE 8 2 62 
01 Delo 211430213 F 

62DBED10ECEDCEDE 
30 CE3C103A 3 C23D3 

D8805A 580 7 68 E009 
DF7A13D2A6AAFF8C 

014B0E014ABB4851 
0 2 0003 A 213682100 

69GD 681509 DD88E? 
0 90C3A1ECCCC2C37 


69D1D 6 0 0 BCBD6AAF 
41EOECOOFAFE633A 

5186FF000608AB21 
C22E 330006023 FAO 

9FECBB009A9E 3080 
153ACCOO 73730042 

OOB 3 CCOOD 2 DB09A6 
000 6AAOOE 2 EOO7CO 

561a 66000803 OD 2 E 
21C 36600 01 FFOEOF 

1C0 3AA0 0 0 8 680F6C 
1A 7 0 33000 ACA.U3E3 

C690B0000FFF0BCC 
A 610 2 0000 73? OCAA 

1AC 98900 0 DBD9C36 
6 3 A 7 2 7 F o o c c c 7 A 6 6 


2D97CCB7496949BB8F 


c 2 8 o A o 00 2 
A o A o 7 o o o 3 

3 811 3 2 A 3 F 
6 1 70 o 070 A 

ABD 3013 EB 
3 2CF o O o 3 F 

0E0 0 90049 
A 3 A 070 O1 D 

B4B6D 990 0 
o o o 1 E 7 7 o 2 

D8D2 8DD9A 
c 2 c A 2 E E7B 

E 2 o 8 E o 8 D o 

2 0 3 4 3 0 2 E o 

E 6 E 3 o o E o o 

3 E 3 c o o 3 0 0 
























A 880 
A888 
A890 
A898 
A8A0 
A8A8 
A8B0 
A8B8 
A8C0 
A8C8 
A8D0 
A8D8 
A8E0 
A8E8 
A8F0 
A8F8 


A 800 
A808 
A 810 
A818 
A820 
A828 
A830 
A838 
A840 
A848 
A 850 
A858 
A860 
A868 
A870 
A878 


AC00 AA FI Cl 
AC08 00 00 00 
AC10 00 00 00 
AC18 00 00 00 
AC20 00 00 00 
AC28 00 00 00 
AC30 00 00 00 
AC38 00 00 00 
AC40 00 00 00 
AC48 00 00 00 
AC50 00 00 00 
AC58 00 00 00 
AC60 00 00 00 
AC68 08 08 08 
AC70 07 23 BO 
AC78 30 7F OF 


AA80 35 C3 
AA88 7E 21 
AA90 AC 09 
AA98 0218 
AAAO 2F 77 
AAAB 13 AC 
AABO AC 21 
AAB8 07 AB 
AACO CB 21 
AAC8 CB 39 
AADO 3E 40 
AAD8 3E 40 
AAEO 57 FI 
AAE8 00 00 
AAFO 79 00 
AAF8 ED 79 


A 900 
A908 
A 910 
A918 
A920 
A928 
A 930 
A938 
A940 
A948 
A950 
A958 
A960 
A968 
A970 
A 978 


A780 
A788 
A 790 
A798 
A7A0 
A7A8 
A7B0 
A7B8 
A7C0 
A7C8 
A7D0 
A7D8 
A7E0 
A7E8 
A7F0 
A7F8 


A990 BB A9 
A998 AC E5 
A9A0 32 5E 
A9A8 CD 19 
A9B0 20 EE 
A9B8 5E AC 
A9C0 FC C9 
A9C8 57 26 
A9D0 ED 79 
A9D8 79 00 
A9E0 00 03 
A9E814 00 
A9F0 3A 5F 
A9F8 00 28 


ABE8 00 00 00 00 00 00 00 00 :00 
ABFO 00 00 00 00 00 00 00 00 s00 
ABF8 ED 78 20 05 FI Cl C3 43 s42 


SUM: EO 2E E4 B1 E2 FD 90 72 :84 


SUM: 5A OF 45 B2 72 70 EO 69 :8B 

AAOO 06 00 2137 AC 09 06 06 : IF 
AA08 73 23 23 23 2310 F9 C9 : D1 
AA10 2168 AC 16 00 3E 07 A3 :33 
AA18 5F 19 7E 2155 AC C3 BB :96 
AA20 A9 2170 AC 3A 5F AC 16 :41 
AA28 00 5F 8? 83 5F 19 46 23 :4A 
AA30 5E 2A 61 AC 19 3A 5E AC :F2 
AA38 CB 3F 30 02 CB CF 5F 19 :4E 
AA40 78 A6 C9 08 D9 3E 0132 :39 
AA4S 5C AC 0102 00 3E 27 00 :70 
AA50 00 00 00 00 00 ED 79 00 :66 
AA58 03 3A 06 AC 00 ED 79 00 :55 
AA60 OE 00 06 00 212B AC 09 s15 
AA68 56 AF BE CA 60 AB 2119 :D2 
AA70 AC 09 BE 28 04 35 C3 60 : F? 
AA78 AB 2125 AC 09 BE 28 04 :90 


SUM: 5D F2 6D C2 08 A3 4A E3 s56 


SUM: CA C9 2C IE 16 3218 F2 :31 


SUM: F5 65IE 21 E7 20 39 FI;CA 


SUM: D3 2B 615E 2D 3F 00 63 : 8C 


A750 IF 21 FO 05 22 72IF DD sC5 
A758 36 0015 DD 36 0114 CD :40 
A760 20 AO DA 3F A5 CD 23 AO : OE 
A768 DD 36 00 00 DD 36 0115 :3C 
A 770 11 D3 AD CD 11 AO C3 3F :11 
A778 A5 CD 9? A7 DD 36 0015 : D8 


SUM: IE 59 8C D5 28 A9 09 B8 :6A 


SUM: E9 9B 88 43 917B A2 39 :36 


ACBO 

17 

60 

IF 

IB 

70 

FO 

IF 

80 ! 

: BO 

AC88 

OF 

IF 

80 

70 

OB 

30 

CO 

13 

:2C 

AC 90 

50 

01 

24 

00 

FF 

25 

01 

7F ; 

: 19 

AC98 

26 

02 

FF 

27 

03 

31 

51 

57 

:2A 

ACAO 

33 

45 

34 

52 

54 

36 

59 

37 : 

: 18 

ACA8 

55 

38 

49 

4F 

30 

50 

41 

5A 

:40 

ACBO 

53 

58 

44 

43 

4D 

2C 

2E 

4B : 

:24 

ACB8 

OD 

20 

4E 

46 

56 

26 

02 

4? 

:86 

ACCO 

02 

69 

02 

8E 

02 

B5 

02 

DE : 

:92 

ACC8 

02 

OA 

03 

38 

03 

69 

03 

9D 

:53 

ACDO 

03 

D4 

03 

OE 

04 

4C 

04 

8D : 

: C9 

ACD8 

04 

D3 

04 

1C 

05 

6A 

05 

4E : 

: B9 

ACEO 

4F 

OD 

20 

20 

20 

20 

20 

20 ! 

: 1C 

ACE8 

20 

20 

20 

20 

20 

20 

31 

20 ! 

: 11 

ACFO 

20 

20 

20 

32 

20 

20 

20 

20 : 

:12 

ACF8 

33 

20 

20 

20 

20 

34 

OD 

20 : 

:14 

SUM: 

51 

FE 

5D 

5E 

32 

B6 

87 

62 ! 

: DB 

ADOO 

43 

4F 

4E 

4E 

45 

43 

54 

20 ! 

:2A 

AD08 

20 

20 

20 

20 

20 

20 

20 

2D ! 

:0D 

AD10 

2D 

2D 

20 

20 

2D, 

， 2D 

2D 

20 

41 

AD18 

20 

2D 

2D 

2D 

OD 

20 

46 

2E 

48 

AD20 

42 

41 

43 

4B 

20 

20 

20 

20 

91 

AD28 

20 

20 

20 

20 

20 

2D 

2D 

2D 

27 

AD30 

20 

20 

2D 

2D 

2D 

20 

20 

2D 

34 

AD38 

2D 

2D 

OD 

20 

4D 

55 

4C 

54 

C9 

AD40 

49 

50 

4C 

45 

OD 

20 

54 

2E 

D9 

AD48 

4C 

45 

56 

45 

4C 

OD 

20 

41 

E6 

AD50 

2E 

52 

41 

54 

45 

OD 

20 

44 

CB 

AD58 

2E 

52 

41 

54 

45 

OD 

20 

53 

DA 

AD60 

2E 

52 

41 

54 

45 

OD 

20 

53 

DA 

AD68 

2E 

4C 

45 

56 

45 

4C 

OD 

20 

D3 

AD70 

52 

2E 

52 

41 

54 

45 

OD 

20 

D9 

AD78 

44 

45 

54 

55 

4E 

45 

OD 

20 

F2 

SUM: 

42 

Cl 

A8 

E5 

68 

9C 

9B 

22 :51 

ADBO 

4B 

2E 

53 

43 

41 

4C 

45 

OD 

EE 

AD88 

4C 

46 

4F 

OD 

20 

46 

4E 

2F 

D1 

AD90 

54 

4C 

OD 

20 

53 

2E 

57 

41 

E6 

AD98 

49 

54 

OD 

20 

44 

45 

45 

50 

E0 

ADAO 

OD 

20 

53 

54 

45 

50 

OD 

20 

96 

ADA8 

4F 

43 

54 

OD 

4E 

41 

4D 

45 

14 

ADBO 

OD 

4E 

45 

49 

52 

4F 

OD 

4C 

E3 

ADBB 

4F 

41 

44 

OD 

53 

41 

56 

45 

10 

ADCO 

OD 

43 

4F 

50 

59 

OD 

45 

58 

F2 

ADCB 

49 

54 

OD 

3E 

3D 

OD 

20 

20 

72 

ADDO 

20 

20 

20 

20 

20 

20 

20 

20 

00 

ADDB 

20 

20 

20 

20 

20 

20 

20 

20 

00 

ADEO 

20 

20 

20 

20 

20 

20 

OD 

46 

13 

ADE8 

49 

4C 

45 

OD 

3D 

3D 

3D 

3D 

DB 

ADFO 

3D 

3D 

3D 

OD 

FB 

C3 

DO 

IF 

71 


SUM ： 28 86 2A 4F 5E AO AB ID sED 


SUM: 25 38 OA 06 D6 44 62 BO :99 

ABOO ID 20 El Cl C3 60 AB C5 s72 
AB08 CB 212107 AC 09 CB 39 sCD 
AB10 7E 23 56 83 38 07 CB 7B : FF 
AB18 28 081518 05 CB 7B 20 : C8 
AB20 0114 5F 79 CB 3F C6 A4 :61 
AB28 CB 4128 05 0102 0018 :54 
AB30 03 0100 00 ED 79 00 OC s76 
AB38 00 00 00 00 ED 5100 OD : 4B 
AB40 D6 04 00 00 00 00 00 00 : DA 
AB48 00 00 00 00 00 00 00 00 s00 
AB50 00 00 00 00 ED 79 00 OC s 72 
AB58 00 00 00 00 ED 59 00 Cl:07 
AB60 OC 3E 06 B9 C2 62 AA AF :86 
AB68 32 5C AC 3A 5D AC FE 00 :?B 
AB70 20 05 08 D9 FB ED 4D 08 :43 
AB78 D9 FB C9 0102 00 3E 25 :03 


SUM: 6A 60 77 AE 4813 B517 : 16 

AB80 ED 79 00 03 AF 00 00 ED :05 
AB88 79 00 OB 3E 24 00 00 00 : E6 
AB90 00 00 00 00 00 〇〇 〇〇 〇〇 ： 〇〇 
AB98 00 00 00 00 00 00 00 ED :ED 
ABAO 79 00 03 3E 6E 00 ED 79 :8E 
ABA8 00 OB 3E 27 00 00 00 00 ：70 
ABBO 00 00 00 00 00 〇〇 〇〇 〇〇 ： 〇〇 
ABB8 00 00 00 00 00 00 ED 79 :66 
ABCO 00 03 3A 06 AC 00 ED 79 :55 
ABC8 00 C9 C5 F5 0102 00 • 3E : C4 
ABDO 27 00 00 00 00 00 00 00 ：27 
ABD8 00 ED 79 00 03 3A 06 AC : 55 
ABEO ED 79 00 OB 00 00 00 00 s71 


SUM: 00 78 92 DE 47 A7 2147 :3E 

A980 AC C3 BB A9 7B 2131 AC :4C 

A988 C3 BB A9 7B 212B AC CD s6? 


152 Oh! MZ 1986.1. 


►10 月のある日，友人の O . K に 12 月号 p .180 の川田君の意見と同じことを，ばくの MZ - 2000 
でやってみせた（ちなみにばくは以前からこのことを知っていたのです〉。そのあと彼が， 
自分の MZ をいじっていると，テープが出てこないことに気づいた。彼はばくがやってみ 
せたと同じようにして直してみたが，電源を入れてもテープが動いてくれない。彼のマシ 
ンは MZ - 2200である。 MZ -1 T 02 を分解して原因を調べてみたが異常はない。もとに戻そ 


92F3E00E4BE76451DFA9 19 0AE9BF4242 


8C0D1E096A16CE71 
2 7CDC30CC3010FFD 

EBD 8 0 8710 7 855980 
B2C7AA7F 843 DOA1A 

0750B0D174E58 2AB 
A1CAOCDC 80 OC 3000 

EO5BDD 80 76E94D6D 
07F0CC7A8CFC6CDC 

D19DD50B7031E7C1 

C2CC5CA04000FF08 

C9BBE5BDC 7670859 
ACF53F0CA7C7310A 

410E09D0EDCDE 482 
6E 230 CC 2 5 DAD0630 

1A 58710 EAAFCD6AD 
2FBA7F 2 33 0 53 ODOC 


0985BAFFA39D3AE822E0230E6414E98D 


CAD84B84DF08C8E5 
AACAOO 39 C027A4FE 

ED8A00 8D2EB1F 309 
5 CAA 2 2 7 CAFOO 5 CAC 

AF4DF11C8CEE28E1 

3A9CFOOA43FF3AOC 

21D 2 EEEF3COC 2 BD7 
AOCAFFF 5 CA1AO 8 CF 

8 0 C8DFC 2 8 F8EED 30 
42A430A3A5153C01 

2 4E3C8EABAFA 8867 
D05CA15083A3AA0F 

B E 2 8 F E A E D 8 3 754 5 〇 
0F3A5033CA0469C2 

EC8BAE 7 2 8 A0CAD20 
F 3 A8 3 3 4 0AA2 〇 D CAO 


410 〇 〇 〇 〇 〇 〇 〇 〇 〇 〇 〇 5 F 9 


00000000000 OOFBF 
0000000000000001 

50000000000 OOEFO 
3000000000000005 

AOOOOOOOOOOOOEO 3 
AOOOOOOOOOOOOOB1 

300 0 000000000 C3F 
40000000000000 21 

30 0 0000 0 00000880 
C00000000000 0 034 


0 2 匚 943B1OBE 411 BE45 


938E1BAB 986 A5D64 
012725 CEOOOllE 80 

C12 9E2E9C88500C6 
A 28073 B0A31F30AC 

17 5 C9FFC7900A0B3 
370A05AA 3300305 2 

198FC 7951 B02B0A1 
2021A 705 2 C00C03F 

BCA1F6C11 911405 D 
AAB 218 A 2 2 30000 FO 

05E7 19F5BB11E0C0 
6270204CCC8 81000 


DDS45FD6A27FA7S3B2DF0E004219761 


A203CDCE 48 AF638F 
0038 ADA70A3CA0 2 4 

08 E 7 FCF98D9BFEA1 
210853513 D1C23B 2 

9087A1AF9DC296DB 
727830353 CA 0 7537 

AE0F08C3B1109FF5 
B3A503A8CC 631504 

F4BC7ED7 5 8AFF388 
AOOA? 078 CF 2 35222 

70DEDE1F785BC1FA 
42C5DF 2541 ECAE4B 

901AB 3100 FEC078D 
c 303000 OA35A6733 

IE 696676 FB3E20A2 
CF1CCC714C253BB1 


18 CF01F9BBF94B 99 
90 3 3 F964FF9EA 2 EO 


AF60D0D7F1AAED2 2 
D 20 0 coc 34 DD 33 CAA 

0D560662F 9 2 22 c 88 
A C A3A 3 5 0 AFOAOA44 

658D1D 30 5 8 E 8 OE3A 
219 DID 2 2 E1F42 5CD 

Do 3 OD9EB9CC 2 F 2 82 
coclcc 5110 ADF3AO 

0601D1FE03FBE8BE 
13AOAF1FO 2 50 FA8F 

ID 96306 A54AEDADC 
OD23D1 7110 3 F3ACA 

65DD10101 89 2 CD8F 
3ACD1A2A2 2CAACA5 

DFO 844 5 09 E78E34A 
D3A01111CBB 45093 


OBI 8189 ED5E379 


FF7F 202 AD 90 BEF 

5 A4B 218 7E7OFF4 

ACA 41370 OD9D5C 

2AAOE 2800 E7DOA 

5F16C7700AD080 

E520A 7800 7 E226 

C2DCF6C1B0053A 

A3C350A0 700203 

E351Z 603320 OE9 

50 FF 206 FOOOOFC 

AEC919A 301 BOC5 

23 AAEC 3000 70A1 























サウン 


0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
A000 
AOOO 

A000 C332A0 
A003 C341A0 
A006 
A006 
A006 

A006 GAAB 
A009 
A00S 
A008 

A00S C 30000 
A00B C3F41F 
A00E C3F4AD 
A011 C3E81F 
A0 14 C3EE1F 
AO 17 C3F71F 
A CSFilF 
DC 3031 F 
A020 G3AF1F 
A023 C3AC1F 
A026 C3A91F 
A029 G3A6XF 
A02C C3A31F 
A02F C3901F 
A032 
A032 
A032 
A0S2 

A032 210099 
A035 3600 
A037 110099 
A03A XZ 
A03B 01F005 
A03E OB 
A03F EDBO 
A041 CD7BAB 
A044 AF 
A045 3267 AC 
A048 210A99 
A04B 112800 
A04E 0626 
A050 3EO0 
A052 77 
A05319 
A054 10FC 
A056 2178 IF 
A059 5E 
A05A 23 
A05B 56 
A05C D5 
A05D DDE1 
A05F CD17AO 
A062 7C 
A063 FEOO 
A065 CA81A0 
A068 FE01 
A06A CA99A0 
A06D RE02 
A06F CABCAO 
A072 FE10 
A074 CAA1A0 
A077 FEi 1 
A079 CAC2A0 
A07C FE20 
A07E CAC8A0 
A081 
A08100 
A082 00 


( 0000 ) 
( 0002 ) 
{0040) 
(0004) 
<000F) 
(00A4) 
(OOAO) 
<0028) 
(05F0> 
(1F78) 
(1F76) 
<1F74) 
<1F72) 
(1F70) 
《 0000) 
< 0001 ) 
(0002) 
(0010) 
( OOU ) 
(0020) 
(OOOG) 
<9900) 
(990A) 
<E007> 
<00B0) 
<00A0> 
<0006) 
( 0000 ) 
<0054) 
(0026) 
<0028) 
(OOOD) 
(00C3) 
(1038) 
( 1039) 
<0070 
(007D) 
<004F) 
(00F3) 
<002E) 
(0030 > 
<0020) 
<0011) 
<0020) 
C002B) 
10025) 
tOOFO) 
<02F8) 
<003E> 
too 仲 ) 
<0020 
(0020) 
<003A) 
<0001) 
<OdiB> 
<005B) 
(0O5D) 
(1770) 
(0054) 




AC83 00 
AC84 3EB0 
A0S6 32O7E0 
A089 3EC3 
A08B 323810 
A08E 21CAAB 
A091 223910 
A094 EDS6 
A096 C3ECA0 
A099 
A099 00 
A09A 00 
A09B 00 
A09C 3EB0 
A09E 3207 £0 
AOAX : 

A0A3 I 


： 0C 

OBAO 


3EA0 
ED47 
01 7000 
3E4F 
AOAA ED79 
AOAC 00 
AOAD 3E06 
AOAF ED79 
AOB100 
A0B2 3EF3 
A0B4 E079 
A0B6 00 
AOB? ED5E 
A089 C3ECA0 
AOBC 
AOBC 00 
AOBD 00 
AOBE 00 
AOBF C399A0 
A0C2 
A0C2 00 
A0C3 00 
A0C4 00 
A0C3 C3A1A0 
A0C8 
A0C8 00 
A0C9 00 
AOCA 00 
AOCB 3€00 
AOCD ED47 
AOCF 017000 
A0D2 3E4F 
A0D4 ED79 
AOD6 00 
AOD? 3E54 
A0D9 ED79 
AOOB 00 
AODC 3EF3 
AODC ED79 
AOEO 00 
A0€1 21CAAB 
225400 
ED5E 
C3ECA0 

AOEC 
AOEC 

AOED 3E0C 
AOEF CDOB^ 
A0F2 DD 360002 
AOF6 DD 360101 
AOFA 11DFAC 
AOFD CDtlAO 
A100 GDI4AO 
A103 UE2AC 
A106 CD11A0 
A109 CD14A0 
A1GC 1IFFAC 
A10F CDMAO 
AU2 C014A0 
AU5 111DAD 
AU8 CD11A0 
AUB CD14A0 
A11E U3BAD 
A12X CD11A0 
A124 CD14A0 
A127 1145 AD 
A12A CD11A0 
A120 CD14A0 
A130 U4EAD 
A133 CDUAO 
A136 CD14A0 
A139 1156AD 
A13C CDUAO 
At3F CD14A0 
At42115EAD 
A145 COllAO 
A148 CD14A0 
A14B U66AD 
A14E CDUAO 
A151 CD14A0 
A154 U6FAD 
A 137 CD1IAO 
A1SA CD14A0 
A1SD 1177 AD 
A160 CDUAO 
A163 CD14A0 
A166 117 FAD 
A169 CDUAO 
A16C CD14A0 
AI6F U88AD 
A172 CDUAO 
A173 CD14A0 
Al?8 U8CAD 
A1?B CDUAO 
A17E CD14A0 
A181 1193AD 
A184 CDUAO 
A18? CD14A0 
A18A 1X9BAD 
A18D CD11A0 
A190 CD14A0 
A193 UA1AD 
A196 CDUAO 
A199 CD14A0 
A19C CD14A0 
A19F 11A7AD 
A1A2 CDUAO 
A1AS 
A1A5 

A1A5 3A67AC 
A1AQ 2600 
A1AA 6F 
AlAB 29 
A1AC 29 
AlAD 29 
A1AE E5 
AlAF 29 
A1B0 29 
AlBt Dt 


NOf> 

NOP 

NOP 


LD 

LO 

OUT 

HOP 

LD 

OUT 

NOP 


| CRT MAKE 
CRTHAK* £t 


LD 

LD 


A f COHJf> 
(HOJPL>,A 
HL f INTOPN 
<HOJPH),HL 


A f PITMO 
<CP8253> f A 
A,IREG 
I，A 

BC f PXOCOH 
A,PI0MD1 
(C) f A 

A t VRE6 

(C>\A 

A,PIOIE 
<C> f A 


CALL 

CALL 

CALL 


LD 

LD 

ADD 

ADD 

ADD 

PUSH 

ADD 

ADD 


A f IRE6X1 

BC^PIQCW 
A f PIOHDl 
<C>，A 

A t VRE6Xl 
<C) f A 

A f PIOIE 

<C>,A 

HU f I NTC»>N 
(X1JPTB) t HL 
2 

CRTHAK 


A f CHRCL.S 

#PRINT 

DE,H1 

•HS0 

•LTr^. 

D€ f M2 


#咖 

#LTNL 

DE f H4 

•MSG 

#LTNt 

DE f M5 

•HS8 

#LTNL 

DE y H6 

#«se 

#LTNL 

D€,M7 

•MSG 

#LTNL 

0e,«8 

#HSQ 
•LTNU 
DE,M9 
#HS8 
•L 丁 NL 

D£ f MlO 

轉 MSG 

•し mt 

D€,HU 

•HSO 

鱗 LTNL 

DE,M12 

#HS8 

#LTNL 

DE f Hi 3 

#MS6 

#LTNL 

DE t H14 

#MS8 

#LTNU 

DE t H15 

«HSG 

•LT^ 

DE f MlA 

#MSQ 

#LTNL 

DE,"17 

#HSQ 

•LTNL 

DE,m8 

•MSG 

#LTNl. 

#LTNL 

DE,m9 

#HS6 


A f (DATNO) 
H,0 

し ， A 

HL f HL 

HL,HL 

HL f HL 

HL 

HL f HL 


|DATA ADR SET 






うとするとネジが 3 本もあまってしまった。もう一度分解すると今度はハンダ付けされて 
いたリード線10数本が取れてしまって，もとに戻せなくなってしまった。そこで彼はつい 
にあきらめてしまい，毎日カラー CRT に表示された 「Make ready CMTj という一文を眺 
めては，こう叫んでいる「シヤレにならんで一 /j 木藤弘志（16> 山口県 


FM 音源サウンドエディタ 15 J 


11議 iii ■ 議麗 IHiiiHHIiisiii 麗議謹戀謹 i 




B 

IC.S 


DATr" 


4? 

s^i: 

;E/DB;E^=-]sr!r-r 5 ly __sr::"H 2 :^L:s 


Top 2 adrhliijp)!/oditrole rID 

_r ㈣ iilrri 


JR IT 

J? r 


1 職 p€€1HErip::K=i§:.s §_•€iEY 

OOTSIFFKdaKIFFMMH«MXCNfN88HHxxDDCJHMpppp«'ouN{l+ssa>K ， SCIsc3Kx 

•> i. «9 •»- «9 } I I *9 ) $ *f •> •» $ .xr s I I {- «t $ gF f 1r «» 5 5 5 5 5 1 — 04, 5 •> I 9 f f $ 5 I 5 - I ?. 


40 HJro H H 28H ilF7a=; F % 7 o 2 i 01 Hl!rHl 0 CH 990 <l_rHll s 4 H38 _i c 3 H ll= 4FH s H H 3OH32 ; 2 BH 37 FOH T60 3EH4BH2CH 20 Hr lBH i 3DH 編 | l CQLl HAJ! 


0 HAH 7 H 


H H H H 
3 B 397 C 7 DM 


A E 

H H H M 
0 4 o D I 
c)o5oLu 


RITAI 

T- 

02 BY 


QU§DUQUQUQUQUauQUQUQUQUQUQUQUQUQUQUiQUQUiQUQUQUiauau-sl!iQUQUQUQUQUQUau3QUQUs;-sQUsauQUououssQUouQU s QU'pQURBa.pTBLi 
E E E E eeeeeeeeeeee EE £ E E £ E £ EE E EE E E £ E E E EE EE E E E £E H E E E E E E £ E EE EE EE o TV J p D 
2 •• «• s 6 s X •• f •• •• •« I J s i «• •* s 5 •• M •!•*•••• •• *• 

*DRSD:ADADDRA5DRADADe:"IRl:::ukxitl:.s)i l 2;32ii;i2.0tsr.*lttl«>l::^KIU:YNlR:».)N“ 


jLLil=ililii=iis===^ 


H HEHHHHHH H H H H>H 
04K8E713F c 9 6 3 D 
OF GEEFFDAAAAA9 
OFIFFFFFFFFFFF 


p 4. p p p p ppppppprp 

T T Y . s •• : .••了 
•• NK: し ： TLS - : : E N 

p TIT gnrntxdidlr 
J IRE STERE^RDDIP 
!;s-r.rf#PF 85 r#Rll: 


TfiTATAS,;A2ALOsuRADROOOB SV 
^AOAAo A T A c A 2 Y ) )0050 o 
)D* ,}D}DS N)DATR，eHxLL0 8 17 214 B 5 2 8 
o > o o s T O D A H > D I 轉 H H R R z R z R z R z R 2 R 1 




LDLDLDSLDDECLDIS sLDLDLDLDLDLDADO i 33 1NCLDPUSCT 5 CPJPCPJPCPJPCPJPCPJPCPJP/C/1I I 

•i .i -or 

■UI5 . .IZ:8C 







(C) f A 

BCfOPN 轉 1 
A^KESADR 


BC 

A，D 

(C) y A 

A,3 


A V A 

D, 0 
E f A 

HL t NOTDAT 

HL,DE 

E, (HL) 

HL 

D, (HL) 

A v (OCT) 
A y A 
A t A 
A V A 

S，A 

H,0 

A f (PARTNO) 
A V A 

し， A 

BC f NOTE 
HL 場 BC 
(HL) f E 
HL 

(HL) f D 
A,<PARTNO) 
O.A 

Z f KYN0L2 

BC.OPNUl 

KYN0L3 

籌〇 


|OCT DATA ADD 


BC 

A f D 



BC 

A.E 


A v (PARTNO) 
D f O 




HL,DEEPS 
HL f DE 
(HL) t A 
HL, し TOPS 
HL t DE 
(HL) t A 
A 

HL, し FOUD 
HL f DE 
<HL>,A 
HL,(DATADR) 
De # SWTOF 

BC 

B,<HL> 

A v (PARTNO) 

D f O 

E，A 

HL f 8TIHe8 
HL.DE 
<HL) f B 
BC 
BC 

A V K£8ADR 
(C) f A 

BC 


fS.WAIT PUT 


2 f KYNOLi 
A,(PARTNO) 
A 

<C> ,A 

A v (PARTM3) 
A 

A,BALLON 
000 OH 
000 OH 
000 OH 


|SLOT ALL OFF 


|SLOT ALL ON 
|NOP*19 


HL V DE 

DE,ODATA 

HL f DE 

(DATADR) f HL 
A f 4 

(OCT) t A 
<IX+0>,7 
<IX+n t 20 
A V 34H 
tPRINT 
<IX+0>,9 

( ix+n ,20 

A f Ch«TEN 
鬌 PRINT 
A f CHRZER 
善 PRIMT 

^CURXS) f A 
(CURYS) f A 
(NOBASU) f A 
(PARTNO f A 
AF 


fKAKU DATA PR I NTStWR ITE 


AF 


CRT«L2t し D 
し！） 

PUSH 


N2 t CRTMLl 

B, 1 
A f B 

(CURXS) V A 

C, 2 
A,C 

(CURYS) t A 


fKAKU DATA PRIN 了攻 WRITE 2 


BC 


A f 4 

B 

NZ t CRTML3 
A v <DATNO) 
(IX«K)> f 4 
<IX+1>,1 
PRIO 
A v 15 
(IX-K)) f A 
A,1 

<IX+1>，A 
DE，(DATADR) 
•MSG 


| DATADR KEI9ANS<N.PRINT 


(CURXS) 

(CURYS) 

CURSET 


INKEY* CALL 


Z y INKEY 
(KEYB) f A 
HL f KEYDAT 
BC f KEYSUU 

NZ V XNKEY 

A.C 

NOTEKY 

C f KYNOTE 

NOTEKY 

D, 0 

E, A 
A t A 
A,E 

HL,KYJPT 

HL $ DE 

(HL) 

KYOUP 
KYODW 
KYDUP 
KYDDW 
KYDHUP 
KYDHDW 
KYCLF 
KYCDW 
KYCRI 
KYCUP 
KYCR 
KY8PC 
KYNOBA 
KYNEUP 


KEY NOBASU/NOBA! 


r NEDW 
ISANAI l 


KYNOBAt LD 


<IX*^0) f 9 
<IX+1>,20 
A y (NOBASU) 




0470 

0471 

0472 

0473 

0474 

0473 

0476 

047? 

0470 

0479 

0480 

0481 

0482 

0483 

0484 

0483 

0486 

048? 

0488 

0489 

0490 

0491 

0492 

0493 

0494 

0493 

0496 

0497 

0498 

0499 

0300 

0301 

0502 

0503 

0504 

0305 

0506 

0507 

0308 

0509 

0510 

0511 

0512 


XOR 

KYNBL3t LD 
AND 


KYNBL4* LD 
KYNBLSi CALL 
CALL 


(NOBASU) V A 
1 

Z f KYNBLl 

A t CHRMIN 

KYNBL2 

A V CHRTEN 

•PRINT 

A v (NOBASU) 

2 

Z f KYNBL4 

A $ CHRPUR 

KYNBL5 

A,CHRZER 

铸 PRINT 

8ETKWT 

INKEY 


NOBASU STOP 


し D BC f 0PN#0 

LD A f KE8ADR 

OUT (C) t A 
NOP 

INC BC 

LD A.D 


►先日，通学 バスの 中で聞いた女子高校生同士の会話0「あたしさあ， パソコンってゲーム 
しかできないと 思って いたけ ど， 計算と かいろい ろできる のネェ J 。 うっ 嬉しい。こういう 
人がひとりでもふえてくれることは非常に嬉しい。しかし，よく考えれば高等学校数学 n 
には「電子計算機と流れ図」という単元があるんですよね。 埜口秀人 （16) 茨城県 


0271 

0272 

0273 

0274 

0275 

0276 

0277 

0278 

0279 

0280 

0281 

0282 

0283 

0284 

0285 

0286 

0287 

0288 

0289 

0290 

0291 

0292 

0293 

0294 

0295 

0296 

0297 

0298 

0299 

0300 

0301 

0302 

0303 

0304 

0305 

0306 

0307 

0308 

0309 

0310 

0311 

0312 

0313 

0314 

0315 

0316 

0317 

0318 

0319 

0320 

0321 

0322 

0323 

0324 

0325 

032< 

032* 

0328 

0329 

0330 


0332 

0333 

0334 

0333 

0336 

0337 

0338 

0339 

0340 

0341 

0342 

0343 

0344 

0345 

0346 

0347 

0348 

0349 

0350 

0351 

0352 

0353 

0354 

0355 

0396 

035? 

0358 

0359 

0360 

0361 

0362 

0363 

0364 

0363 

0366 

0367 

0368 

0369 

0370 


A1B2 19 
A1B3 110099 
A1B6 19 
A1B7 2261AC 
A1BA 3E04 
A1BC 3265AC 
AIBF DD36000? 
A1C3 DD 360114 
AIC7 3E34 
A1C9 CDOBAO 
A1CC 0D 360009 
A1D0 DD 360114 
A1D4 3E2E 
A1D6 CDOBAO 
AID9 3E30 
A1DB CDOBAO 
AIDE AF 
A1DF 325EA( 
A1E2 325FAC 
A1E5 3263AC 
A1E8 3266AC 
A1EB F5 
AlEC CD21AA 
A1EF 00 
AIFO 4? 

A1F1 CD19A9 
AtF4 FI 
A1F5 3C 
AIF6 325FAC 
A1F9 FEOF 
AtFB 20EE 
A1FD 0601 
A1FF 78 
A 200 325EAC 
A203 0E02 
A20S 79 
A206 323FAC 
A209 C3 
A20A C021AA 
A20D 00 
A20E 47 
A20F CD19A9 
A212 Cl 
A213 OC 
A214 3E0B 
A216 B9 
A217 20EC 
A219 04 
A21A 3E04 
A21C B8 
A21D 20E0 
A2XF 3A67AC 
A222 DD 360004 
A226 DD 360101 
A22A CDDDA8 
A22D 3E0F 
A22F DD 7700 
A232 3E01 
A234 DD7701 
A237 ED5B61AC 
A23B CDilAO 
A23E AF 
A23F 325EAC 
A242 32SFAC 
A245 CD94A8 
A248 
A248 

A248 7 

A248 COOEAO 
A24B FEOO 
A24D 28F9 
A24F 3264AC 
A2S2 21BCAC 
A255 012000 
A25B EDB9 
A25A 20EC 
A25C 79 
A25D FE11 
A25F DA0SA3 
A262 0611 
A264 1600 
A266 5F 
A267 87 
A268 83 
A269 5F 
A26A 216FA2 
A26019 
A26E E9 
A26F C30AA4 
A272 C306A4 
A27S C32BA4 
A278 C327A4 
A27B C333A4 
A27E C32FA4 
A281 C3D2A7 
A284 C347A8 
A28? C3F8A? 
A28A C31DA6 
A28D C37AA4 
A290 C3D3A2 
A293 C39CA2 
A296 C3SBA4 
A299 C36AA4 
A29C 
A29C 
A29C 

A29C DD 360009 
A2A0 DD 360114 
A2A4 3A63AC 
A2A7 3C 
A2A8 FE04 


ft2AA 2001 
A2AC AF 


> 3263 AC 
) E601 
J 2804 


A2AD : 

A2B0 i 
A2B2 : 

A2B4 3E2D 
A2B6 1802 
A2B8 3E2E 
A2BA CDOBAO 
A2BD 3A63AC 
A2C0 E602 
A2C2 2804 
A2C4 3E2B 
A2C6 1802 
A2C8 3E30 
A2CA CDOBAO 
A2CD CD71A8 
A2D0 C346A2 
A2D3 
A2D3 
A2D3 

A2D3 1600 
A2D5 F3 
A2D6 010000 
A2D9 3E28 
A2DB ED79 
A2DD OO 
A2DE 03 
A2DF ?A 
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；DATA UP IX 

KYDWt LD 
JR 

KYDUPi し D 
JR 

KYDHDWi LD 


LD 

LD 


I KEY 

B f FFH 

KY01 

B,1 

KYD1 

B,FBH 

KYDX 

B.S 

HL f DATDAT 
A v (CURY8) 
DfO 
E，A 
A,A 
A,E 
E，A 
HL,DE 
A,<HL) 


POP BC 

ADD A•B 

LD B V A 

CALL DATINP 

CALL KWAIT 

JP INKEY 

I 

j NEIRO DATA UP 
KYNEUPx LD A f (DATNO) 

INC A 

CP DATASU 

JR NZ.KYNULl 


| NEIRO 
I 

KYNEDWi 


DATA DOWN 
し D A v (DATN( 


KYNDLli LD 


A 

NZ V KYNDL1 
A,37 

(DATNO),A 
CRTMAK 


LD 

LD 

CALL 


CURCLR 
<IX+0>,22 
<IX+1>,16 
DC f M22 
«MSO 

<IX-K» ,22 
《IX+1>,17 
DE f M21 
#M8G 

<IX+0>,22 
<IX+1>,18 
DE f M23 
#MSQ 

(XX'fO) ,22 
<IX+l> ,19 
DE f M24 
#HSQ 

<IX+0> % 22 
HX^i) ,20 
DE $ M25 
#MSQ 


B v 16 
0ETKWT 
KWAIT 
<IX+0>,20 
(IX-f!) V B 
A V CHRDAI 
眷 PRINT 
#QETKY 
CHRK 


| OCT UP DOWN 

KYODWi LD 
JR 

KYOUPt LD 

KYOLll し D 
ADD 
AND 
LD 
LD 
LD 
LO 
ADD 
CALL 
CALL 
JP 


KYN0L4 
A v (PARTr 
A 

A f 3ALL0r 
(C) V A 


N2 f KYNOL5 

(PARTNO) f A 
INKEY 


KY0L1 

A,1 

HL f OCT 
A t (HL> 

07H 
(HL>，A 
(IX-K)) f 7 
<IX+1) f 20 

a 9 chrier 

A f (HL) 
tPRINT 
GETKWT 
INKEY 


|SLOT ON 
I SLOT ALL ON 


|-1iDOWN 
l^liUP 


1-liDOWN 

•♦1*UP 

|-S*HIGH DOWN 
1^51 HIGH UP 


06911 A4EA 280A 
06921 A4EC FE2C 
06931 A4EE 281C 
06941 A4F0 FEOD 
06931 A4F2 282E 
06961 A4F4 18E0 
06971 A4F6 DD 360014 
06981 A4FA DD 7001 
06991 A4FD 3E20 
07001 A4FF CDOBAO 
07011 A302 OS 
07021 A503 3E0F 
07031 A50S B8 
07041 A506 20CE 
07031 AS08 0614 
07061 A50A 18CA 
07071 A50C DD 360014 
07081 A510 007001 
07091 AS13 3E20 
07101 AS15 CDOBAO 
07111 AS10 04 
07121 AS19 3E16 
07131 AS1B B8 
07141 ASIC 20B8 
07131 A91E 0610 
07161 A920 18B4 
07171 AS22 
07101 A322 78 
07191 AS23 FC11 
07201 ASM CA4BA5 
07211 AS20 F£10 
07221 AS2A CA98A5 
07231 AS2D FE12 
07241 A32F CA79A7 
07231 AS32 FEX3 
07261 A 334 CA17A7 
07271 AS37 FEi4 
07201 AS39 CAAEA6 
07291 A33C C308A0 
07301 A53F 
07311 AS3F CD97A7 
07321 A542 CD71A8 
07331 A543 CD94A8 
07341 A548 C348A2 
07331 AS4B 
07361 AS4B DD 3600 IS 
07371 A54F DD 360113 
07381 A5S311ACAD 
07391 AS56 CD11A0 
07401 A339 CD71A8 
07411 A3SC DD 360116 
07421 A 360 CDADA7 
07431 AS63 DA3FAS 
07441 A566 DS 
074St AS6? DD 3600 OF 
07461 A56B DD 360101 
07471 AS6F U03AD 
0?46t A572 CD11A0 
07491 AS7S Dl 
07301 A376 DD 3600 OF 
07311 AS7A DD 360101 
07321 A37E 2A61AC 
07331 AS81 060A 
07341 A383 AF 
073Si A384 B9 
07361 AS8S 3E20 
07371 AS87 2801 
07381 A5891A 
07391 AS8A 77 
07601 AS8B CDOBAO 
07611 A58E OD 
07621 A30F 23 
07631 AS9013 
07641 AS91 10F0 
07631 AS93 3600 
07661 AS95 C33FAS 
0767* AS98 
07681 AS98 CDA5A5 
07691 AS9B CD49A6 
07701 AS9E 78 
07711 AS9F 3267AC 
07721 ASA2 C3ECA0 
07731 ASA9 
07741 A5AS 3E0C 
07731 ASA7 CDOBAO 
07761 A5AA DD 360010 
07771 ASAC DD 360101 
07701 A9D2 UECAD 
07791 ASB9 CD11A0 
07001 ASB8 DD 36001 1 
07811 A5BC DD 360102 
07821 A5C0 UB1AD 
07831 A9C3 CDUAO 
07841 ASC6 DD 360010 
07831 ASCA DD 360103 
07861 A3CE UECAD 
07071 A3D1 CDUAO 
07881 ASD4 DD 360005 
07091 A5D8 OD 360104 
07901 ASDC 1U>F AC 
07911 A3DF CDUAO 
07921 ASE2 DD 3600 OA 
07931 AX6 11 ACAD 
07941 ASE9 CDUAO 
07931 A5EC DD 360016 
07961 A5F0 UDFAC 
07971 ASF3 CDUAO 

A5F6 DD 3600 IB 
A5FA 11ACAD 
A5FD CDUAO 
08011 AAOO 0600 
08021 A 602 DD 360105 
0803t A606 110099 
08041 A609 21F802 
08031 A60C 19 
00061 A600 EB 
08071 A60E 1 
08081 A612 ' 

00091 A613 CDDDA8 
00101 A616 3E3A 
08X11 A618 CDOBAO 
08121 A61B EB 
08131 A61C CDUAO 
08141 A61F DD 360015 
OQISt A623 3E13 
08161 A62S 80 
08171 A626 CDDDA8 
08181 A629 3E3A 
08191 A62B CDOBAO 
08201 A62C EB 
06211 A62F CDUAO 
06221 A632 D3 
0823t A633 112800 
08241 


07981 

07991 

08001 


DD 360004 
78 


082S« 
08261 
08271 
0828 1 


， Dl 


A638 ES 
A639 212800 
A63C 19 
08291 A63D EB 
08301 A63E El 



A f CHRSPC 

#PRINT 



NZ f KYCRL3 

B v 16 

KYCRLS 


|NAME INPUT 


(HL) V A 
鱗 PRINT 


CRNAL1 
(HL),CHRCR 
KYCR し E 

HE1CRT 

CRKCCU 

A,B 

(DATNO) f A 
CRTMAK 

A,CHRC し S 
•PRINT 
(IX^O) f 16 
(IX+1>,1 
DE,H29 
轉 MSG 

UX+0> f 17 
<IX+1>,2 
DE t h22 
•M8G 

<IX+0>,16 
(IX+U ,3 
DE,M29 
#M8G 
(IX^O) f S 
<IX+U ,4 
DE,M1 
轉 M8G 

<IX+0>,10 
DE V M21 
鱗 MSG 

<IX+0>,22 

DE,H1 

•MSG 

(IX+0>,27 

DE V M21 

•MSG 

B，0 

<1X4.1),3 
DE.ODATA 
HL f ODMID 
HL f DE 


PR10 

A,CHRCOf 


UX.0>，21 
A,19 

PRIO 

A.CHRCOR 

#PRINT 

DE，HL 

«MSG 

DE 


DE V D 

HL f I> 


HL f DATALO 

HL f DE 

DE.HL 
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►中学時代以来，何年もハンダゴテを握ったことのない私にとって，今回のハードウェア 
人門はとてもなつかしいもののように思えました。さっそくごの“ハード S - OS ” の企画 
にも参加しようと思っています。 ェ藤昭彦（22> 東京都 


0618 

0619 

0620 

0621 

0622 

0623 

0624 

0625 

0626 

0627 

0628 

0629 

0630 

0631 

0632 

0633 

0634 

0635 

0636 

063? 

0638 

0639 

0640 

0641 

0642 

0643 

0644 

0645 

0646 

064? 

0648 

0649 

0650 

0631 

0652 

0633 

0634 

0653 

06S6 

0637 

06S8 

0639 

0660 

0661 

0662 

0663 

ObbA 

0663 

0666 

0667 

0668 

0669 

0670 

0671 

0672 

0673 

0674 

0673 

0676 

0677 

0678 

0679 

0680 

0601 
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CRCLR 
<IX+0>,21 
<IX4.l> f 16 
神 RDI 

C f KYCRLE 
<IX+0>,21 
#FPRNT 
#RDD 
CRNEIR 

B,8 

(IX+U ,16 
(IX+0> f 20 



HL f 21 

HL f DE 

HL 

A 

C，A 

(HL) 

Z.BETll 


DE 


;Cl«SOR KEY 
I 

KYCLF* LD 


•KYCULlt CALL 


KYCRIt LD 


NC,INKEY 
A v <CURXS) 



NC,INKEY 
A y <CURXS> 


KYCUPt CALL 


KYCULlt CP 


KYCUL2* LD 

CAL し 

CAU し 


KYCDL1: CP 


KYC0L2* ID 

CALL 
CAL し 


N2 f KYCDL2 

B，A 

A v (CURXS) 
1 

A，B 

C $ KYCDL2 

A,2 

(CURYS) $ A 
CURSET 
KWAIT 
INKEY 


0T02UKURI NO SUB 


KEY 0 HANA3ITARA RET 
BREi 


QETWLli CALL 
CP 
JR 
DJNZ 
POP 
RET 
S 

I KEY OFF THEN I 
； BREAK A，l 

SETKWNi PUSH I 

LD HL t KEYB 

BEWNL1* CALL #8ETKY 
CP (HL> 



RETl 

F 


•LTNL 

A,19 


OETKWT 

CRNEL9 

A f CHRDAI 

•PRINT 

KWAIT 

#0ETKY 


2 f CRNELS 

CHRCON 

2 f CRNEL6 


CRNE し日 

A f 18 

B 

C f CRNELA 

A，S 

A,B 

<lX+0>,4 
UX^l) f A 

A f -t4 

A,B 

ax + o > , 2i 

<IX+i>,A 


CRNEL9 

A,CWSPC 

•PRINT 

卜 

NZ.CRNE し 4 

B % 37 

CRNEL4 


N2 f CRNEL4 

B,0 

CRNEL4 

NEICRT 
<IX+0>,3 
<IX+l>,0 
DE f M30 
«HSO 
HX^O) f 7 
<IX+1>,1 
DE f H31 


CRNECU 

A，B 

(DATNO) t A 
<IX+0>,4 
<IX^1>.1 
PRIO 
CRNECU 


A，B 

(DATNO).A 


JLEFT 


jRIGHT 


I UP 


多 DOWN 


08311 
0832J 
0833j 
08348 
08351 
0836t 
08371 
08381 
08391 
08401 
08411 


0044# 
06451 
08461 
08471 
0848z 
08491 
08501 
08511 
0832 1 
08331 
08541 
08551 
0656) 
08571 
08S8s 
08591 
08601 
0861s 
08621 
0863t 
0864: 
086 5: 


A63F 04 
A640 CD14A0 
A643 3E13 
A645 B6 
A646 2006 
A648 C9 
A649 

A649 3A67AC 
A64C 47 
A64D CD71A8 
A650 CD6BA6 
A653 3E3E 
A655 CDOBAO 
A6S6 CD8BA8 
A65B CDOEAO 
A63E FE4B 
A 660 2824 
Mh2 FE2C 
A664 283^ 
M66 


134 

：0D 


A669 

A66B 

A66D 

A66E 

A670 

A6?2 

A673 

A677 

A67A 

A67B 

A67D 

A67E 

A682 

A665 


撕〇 

3E12 

B8 

380b 

3E05 

80 

DD 360004 
DD7701 
C9 


3EF2 

80 

DD36< 

0077( 

C9 


0866* A686 
086?: A686 CD6BA6 
08681 A689 3E20 


0869: 
08701 
0871; 
08721 
08731 
0874: 
0873! 
08761 
08771 
08781 
08791 
06801 
0881 x 
0882: 
0883: 
00841 
08831 
0886: 
08871 


A68B CDOBAO 
A68E 05 
A68F 3EFF 
A691 B8 
A692 C250A6 
A695 0625 
A697 C350A6 
A69A 

A69A CD6BA6 
A69D 3E20 
A69F CDOBAO 
A6A2 04 
A6A3 3E26 
A6AS B8 
A6A6 C250A6 
A6A9 0600 
A6AB C350A6 
A6AE 

A6AE CDA5AS 


0890t A6B9 i 1C6A0 
0891: A6BC CD11A0 
08921 A6BF DD 360007 


08931 
08941 
08931 
08961 
089?: 
0898: 
08991 
09001 
09011 
09021 
09031 
09041 
09031 
09061 
09071 
09081 
09091 
09101 
09111 
09121 
09131 
09141 
09151 
09161 
09171 
09181 
0919 1 
09201 
09211 
09221 
09231 
09243 
092 3x 
09261 
09271 
09281 
0929! 
0930* 
09311 
09328 
09331 
09341 
09351 
09361 
09371 
09381 
0939 1 
09401 
09411 
09421 
0943 1 


A6C3 

A6C? 


DD 360101 
11CBAD 
A6CA CDUAO 
A6CD CD49A6 
A6D0 78 
A6D1 3267AC 
A604 DD 360004 
A6D0 DD 360101 
A6DC CDDDA8 


A6E5 

A6E6 


A6E? 3267AC 
A6EA 79 
A6EB 6F 
A6€C 2600 
A6EE 29 
A6EF 29 
A6F0 29 
A6F1 E5 
A6F2 29 
A6F3 29 
A6F4 D1 
A6F5 19 
A6F6 110099 
A6F9 X9 
A6FA E5 
A6FB 3A67AC 
A6FE 6F 
A6FF 2600 
A701 29 
A702 29 
A703 29 
A704 ES 
A705 29 
A?06 29 


A707 

A708 


09441 
0943 1 


A?09 110099 
A70C 19 
A70D D1 
A70E EB 
A70F 012800 
A712 EDBO 
A714 C3ECA0 
A717 

A717 CD97A7 
A71A DO 360015 
A?1E DD 360110 
A722 UE7AD 
A725 CD11A0 
A728 CD1AAO 
0946 t A72B 11ACAD 
094? t A72E CDltAO 
0948: A731 CD71A8 
09491 A734 003601 11 
09501 A738 CDADA? 
095 lr A73B DA3FA3 
09521 A73E 3E01 
09331 A740 CD2CA0 
0954 » A?43 FD2A741F 
09331 A74? FD 36110 D 
09561 A74B 210099 
09371 A74E 2270 IF 
0958* A7S1 21F005 
09591 A 754 22721F 
0960 x A 737 DD 360015 
09611 A75B DD 360114 
09621 A75F CD20A0 
09631 A762 DA3FAS 
096 4: A765 CD23A0 
0963 I A768 OD 360000 
096 6: A76C DD360U5 
09671 A770 U03AD 
09681 A773 CDUAO 
09691 A776 C33FA5 
09701 A779 
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►この刖，大阪の日本橋へ行って来た。スゴイですねぇ。人はいっぱい，電気屋さんもい 
っぱい，これから日本掎へ行ってみようと思っている皆さん，日本橋へ行くには近鉄の日 
本橋駅を使うより，地下鉄のえびす町駅で降りてください。駅から出るとそこは日本橋の 
ドまん中です。 波多野幸也 （17) 京都府 


CAL 33 CALLJPLDCALLSJPLDLOLOLDCALLCALDJNRETLDL.DLDINCLDCALLOcpJRSCFRETUDADDPUSHXORLDcpJRINCINCJRpop^T 
OAOXRILR1 
CRLJCRC 




し； HL た HL HLDE r DAT;Hl.HLHLHl.HLDE§0EHL40i 5 :rrNTI M2 

u A 〇 » * » t t « « t (AO t t 1 t t t t 9 f 9 T c X X Is R v_ 
fL,H,HLHLHLHLHLHLDEHLDEHLHLA.«.,H,M.HLHLHLHLa!DEHUDEHLI>EDEBCCRguCIDE^tpDEl 


17E FFA,0A)*ASfH?32 E o 
9 1 T )RLI I7^DAE>>rl) 

«ti2w1lcje«1dadzoi Co 

r 81 i-TlKYOBJILEtc^foDTtoD^^ICY-s 
re#H6E(x6£CJA.,#FIY<IHL(«HL(l>(I(I_c f llw(I 




5 0 


:… 彳一 =EiE=_IE=E ii! ===E!iE!iE^ 


717273747576777879 
SSSSS0909S ， 





Hi: 

111 < 

Ills 

1116 

1117 

1118 

1119 

1120 
1121 
1122 

1123 

1124 

1125 

1126 
1127 
1120 

1129 

1130 

1131 

1132 

1133 

1134 
1133 

1136 

1137 

1138 

1139 

1140 

1141 
1M2 

1143 

1144 
IMS 
1146 
U47 

1148 

1149 
U50 

1151 

1152 

1153 
1194 
1199 
1156 

1137 

1138 

1139 
1160 
1161 
1162 
1163 
116 磚 
1163 
1166 

1167 

1168 

1169 

1170 

1171 

1172 

1173 

1174 
1173 

1176 

1177 
1170 

1179 

1180 
1181 
1182 

1183 

1184 
1189 
1186 
116? 
1188 

1189 

1190 

1191 

1192 

1193 

1194 
1193 

1196 

1197 

1198 

1199 

1200 
1201 
1202 

1203 

1204 
1203 
1206 

1207 

1208 

1209 

1210 

12： 

12 


12 

12 

1220 

1221 

1222 

1223 

1224 
1223 
1226 

1227 

1228 

1229 

1230 

1231 

1232 

1233 

1234 
1239 

1236 

1237 

1238 

1239 

1240 

1241 

1242 

1243 

1244 
1243 

1246 

1247 

1248 

1249 
1230 


A887 28FA 

A 88 ? El 

AB 8 A C9 

A 88 B 

A 86 B 

A88B 

A 88 B 

A 86 B 217017 
A 88 C 2B 
A 88 F 7C 
A890 B5 
A891 20FB 
A893 C9 
A894 
A894 
A894 
A894 
A894 FS 
A895 C5 
A896 CDC0A8 
A899 3E5B 
A89B CD0BA0 
A89E 70 
A89F DD 7700 
A8A2 3E5D 
A8A4 CDOBAO 
A 8 A? Cl 
A 6 A 8 FI 
A8A9 C9 


A 8 AA 
A 8 AA F5 
ABAB C3 
ABAC CDC0A8 
A 8 AF 3E20 
AGD1 CDOBAO 
A0B4 78 
AGBS DD 7700 
A8B0 3E20 
A 8 BA CDOBAO 
A 8 BD Cl 


KEY WAIT 
BREAK HL ? A 


A 8 BE 

A 8 BF 


C9 


ICF 3A5FA( 
\D2 C603 


A6C0 
A0CO 
A8C0 
A6C0 
A8C0 3ASEAC 
A8C3 47 
A8C4 87 
ABCS 87 
A 6 C 6 80 
A8C7 C60A 
A0C9 DD 7700 
A 8 CC C604 
A0CE 47 
A 8 CF 
A6D2 
A6D4 FEOe 
A 8 D 6 3801 
A 8 D 6 3C 
A8D9 DD7701 
A 8 DC C9 
AGDD 
A 8 DD 
A 8 DD 
A80D 
A 8 DD 
A 8 DD CS 


A8C1 0E30 
AGE3 FE64 
A 8 ES 3803 


A 6 E 8 D664 
A 8 EA 18F7 
A 8 EC CD02A9 
A 8 EF FEOA 
A8F1 3003 
AQF3 OC 
A8F4 D60A 
A 8 F 6 1BF7 
A 6 F 8 CD02A9 
A 8 FB 81 
A0FC CDOBAO 
A 8 FF D1 
A900 Cl 
A901 C9 
A 902 


A902 

A903 

A904 


47 

AF 

BA 

79 

200A 


A90C : 
A90E : 


A90S : 

A906 •• 

A908 FE30 
A90A 2004 
3E20 
1802 
A9I0 1601 
A912 CDOBAO 
A915 78 
A916 0E30 
A918 C9 
A919 
A919 
A919 
A919 
A919 

A919 3A5EAC 
A91C 5F 
A91D 87 
A91E 07 
A91F 03 
A920 C60B 
A922 DD 7700 
A92S 3A5FAC 
A928 C603 
A92A FEOE 
A92C 3801 
A92E 3C 
A92F 007701 
A932 2170 AC 
A933 3ASFAC 
A93Q 1600 
A93A SF 
A93B 87 
A93C 83 
A93D 5F 
A93E 19 


\9ZF 

1940 


A« 

A941 AO 
A942 47 
A943 C5 
A944 CB39 
A946 3804 
A948 CB3F 


A f H 

NZ f WAIT し 1 


CURSETs PUSH 
PUSH 
CALL 


CURKEI 
A f CMRDCO 
CALL UPRINT 
し D A y B 

LD <1X+0>，A 

LD A.CHRDCC 

CALL tPRINT 
POP BC 

POP AF 


CURCLRi PUSH 


LD 


LD 

CALL 

POP 

POP 

RET 


• CURSOR KEISAN 
| BREAK A V F,B 
I 

CURKEIi LD 


CURKEI 

A.CHR 8 PC 

•PRINT 

A f B 

<lX+0> 

A f CHR 8 PC 

•PRINT 


ADD 

ADD 

ADD 

ADD 


LD 

LD 


A v (CURX 8 ) 
B，A 
A，A 
A V A 
A,B 
A,10 
CIX-K)) ,A 
A,4 
B，A 

A v (CURY 8 ) 


INC A 

CURSLls LD <IX+1> 
RET 

DECMAL 3KETA PRINT 
PRINT DATA ACC 
BREAK A f ff 


PR10L4t CALL 
ADD 
CALL 


POP 

RET 

PRIO 81 LD 
XOR 



CP 

LD 


A，C 

NZ V PR1081 

CHRZER 

NZ V PR10 82 

A V CHR 8 PC 

PR1081 

D，1 

•PRINT 
C v CHRZER 


DATA INPUT 

INPUT DATA B v (CURX 8 ) 9 (CURY 8 ) 
BREAK ALL 


DATINPi LD 
LD 
ADD 
ADD 
ADD 
ADD 


DATILAt LD 


A v (CURX 8 ) 

E.A 

A f A 

A,A 

A,E 

A v ll 

<IX+0>，A 
A 9 <CURYS) 
A,3 
14 

C V DATIL1 

<IX+1>，A 
HL V DATDAT 
A,<CURYS) 
0.0 
E，A 
A V A 
A f E 

HL f OE 
A v (HL) 

C f A 

B，A 

BC 

C V DATIL 8 


|CURSOR X SET 


|CURSOR Y SET 


1231 

1232 

1233 

1234 
1233 

1256 

1257 
1256 
1239 
1260 
1261 
1262 

1263 

1264 
1269 
1266 

1267 

1268 

1269 

1270 

1271 

1272 

1273 

1274 
1273 

1276 

1277 

1278 

1279 

1280 
1281 
1282 

1283 

1284 

1285 

1286 

1287 

1288 

1289 

1290 

1291 

1292 

1293 

1294 
1293 

1296 

1297 

1298 

1299 

1300 

1301 

1302 

1303 

1304 
1303 

1306 

1307 

1308 

1309 

1310 

1311 

1312 

1313 

1314 
1319 

1316 

1317 

1318 

1319 

1320 

1321 

1322 

1323 

1324 

1325 

1326 

1327 
1320 

1329 

1330 

1331 

1332 

1333 

1334 
1333 

1336 

1337 

1338 

1339 

1340 

1341 

1342 

1343 

1344 
1343 

1346 

1347 

1348 

1349 

1350 

1331 

1332 

1353 

1354 

1355 

1356 
1337 
1358 
1339 

1360 

1361 

1362 

1363 

1364 
1363 
1366 
136? 

1368 

1369 

1370 

1371 

1372 

1373 

1374 
1373 

1376 

1377 

1378 

1379 

1380 

1381 

1382 

1383 

1384 
1383 

1386 

1387 

1388 

1389 

1390 


A94A 18F8 
A94C Cl 
A94D CDDDA 8 
A9t50 23 
A9315E 
A952 E3 
A9S3 2A61AC 
A93619 
A957 3A5EAC 
A95A CB3F 
A9SC 3002 
A95E CBCF 
A 960 3260AC 
A963 3F 
A964 19 
A963 79 
A966 2F 
A967 A 6 
A968 BO 
A969 77 
A96A Ei 
A96B 23 
A96C 5F 
A96D 56 
A96E 3E03 
A970 BA 
A971 304F 
A973 280F 
A975 3D 
A976 BA 
A977 2812 
A979 3D 
A97A BA 
A97B 2843 
A97D 7B 
A97E 214FAC 
A90X C3BBA9 
A984 7B 
A9BS 2131AC 
A900 C3BBA9 
A98B 7B 
A98C 212BAC 
A98F CDBBA9 
A992 2ASEAC 
A995 ES 
A996 2A3FAC 
A999 E3 
A99A 3E03 
A99C 32SFAC 
A99F AF 
A9A0 325EAC 
A9A3 F3 
A9A4 CD21AA 
A9A7 47 
A9A8 CD19A9 
A9AB FI 
A9AC 3C 
A9AD 0604 
A9AF BF 
A9B0 20EE 
A9B2 El 
A9B3 22SFAC 


A9B6 

A9B7 


El 


22!SEAC 
A9BA C9 
A9BB 0606 
A9BD 77 
A9BE 23 
A9BF 10FC 
A9C1 C9 
A9C2 

A9C2 3A60AC 
A9C5 8 ? 

A9C6 87 
A9C7 82 
A9C8 57 
A9C9 2603 
A9CB F3 
A9CC 010000 
A9CF ?A 
A9D0 ED79 
A9D2 00 
A9D3 03 
A9D4 7B 
A9D5 00 
A9D6 00 
A9D7 ED79 
A9D9 00 
A9DA 010200 
A9DD 7A 
A9DE ED79 
A9E0 00 
A9E103 
A9E2 7B 
A9E3 00 
A9E4 00 
A9E5 ED79 
A9E7 00 
A9E814 
A9E9 00 
A9EA 00 
A9EB 00 
A9EC 23 
A9ED 20DD 
A9EF FB 
A9F0 3A5FAC 
A9F3 FE03 
A9F3 2805 
A9F7 FEOO 
A9F9 2015 
A9FB C9 
A9FC 3A60AC 
A9FF 4F 
AAOO 0600 
AA02 2137AC 
AA05 09 
AA06 0606 
AA08 73 
AA09 23 
AAOA 23 
AAOB 23 
AAOC 23 
AAOD 10F9 
AAOF C9 
AAiO 2168AC 
AA13 1600 
AA1S 3E07 
AA17 A3 
AA10 3F 
AA1919 
AA1A 7E 
AA1B 21S5AC 
AA1E C3BBA9 
AA21 
AA21 
AA21 
AA21 
AA21 

AA21 2170AC 
AA24 3ASFAC 


►ぼくは通学中に「ミラノ XI 


|にあやうくひかれそうになったことがあるのでした。 

小林敦 （16) 長野県 


HL,(DATADR) 

HL f DE 

A v (CURXS) 


NC f DAT 

l.A 

《CURXS! 

HL f DE 

A,C 


|OFFSET DATA PUT 
|DATA AREA 8 ANSHUTU 1 


|DATA AREA SAN 8 WTU 2 


|MASK DATA CPL 


HL 
HL 
E，A 
D f (HL) 
A f 3 

C.DATIL3 

Z,DATIL4 


JDATA AREA WRITE 


|LFO DATA? 

|LFQ DATA SHORI 


A 

D 

Z f DATIL3 

A f E 

HL,FVFU3 
DATXl 


TILC 


A,E 
HL f 8 TEP 
DATILC 
A f E 

HL f DEEP 
DATILC 
HL,(CURXS) 
HL 

HL,(CURY 8 ) 

HL 

A，3 

(CURY 8 ) f A 

(CURX 8 ) f A 

DATOUT 

B，A 

DATINP 


|F.NO OR VR F 
| STEP 


B v 6 
<HL) f A 


A f (CURXSS) 

A V A 

A,A 

A f D 

D.A 

H,3 

BC f 0PN#0 
A，D 
(C) V A 


BC 

A f E 


BC f OPN#X 
A,D 
(C) V A 

BC 

A，E 

(C) f A 


;SUB ADR SANSHUTU 


A t (CURXSS) 

C,A 

B,0 

HL f TLEVEL 
HL f BC 
B v 6 
(HL) V E 


I TO TOTAL LEVEL 
|TO CONNECT 
iTOTAL し EVEL 


HL.DATCON 
D,0 
A,7 

HL % DE 
A f (HL) 
HL f LFOCON 
DATILC 


;CONNECT OP NO DATA 


DATALL 

ItSII I I —1st I I I —rnE1 
IL8IL2L4LSLBLCL0L3LFL6LEL7ATA0UBR3UT 
I III XI I I II I«G 
DATOAT 1 DATDATDAT;DATDATDATDATDAT. D : • u 
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し FOLBF* PUSH 


BC 


W- t NOTE 

HL,BC 


iF.NO.M 

|D€EP^ 


し FOUPCi BIT 


INC 

し FO し B7i LD 


香 F. NO. SADR HI 


|OPN F. 
fN0P»18 


NO.SADR LOW 


し FONEXi INC 


RET I 

LFOLBAi EX 
EXX 


E ^t 


TAHSADi EQU 
TAL8AD* EQU 
CTSADRi EQU 
I 

し FOSS: ENT 


25H 

24H 

27H 


|TIMER A LOW SUB ADR 
|CONTROL SUB ADR 


D£FW 

DEFW 

DEFW 

DEFW 

DEFW 

DEFW 

DEFW 

D£FW 


|TIMER A HIGHT DATA 
|NOP#2 


|TIMER A LOW DATA 


000 OH 
000 OH 
(C) f A 


► Oh / MZ にひとつ提案があるんですが，毎月「隠しプレゼント」というのを実施してみ 
Oh!MZ 1986.1. てはいかがでしようか。表紙から最後のページにかけて場所を•問わず，小さな文字でチョ 

コッとプレゼントを入れておくのです。そうすれば Oh / MZ のスミからスミまで読んでい 
る人にだけ幸運が舞い込み，立ち読みをして，愛読者カードを切り取って出すような極悪 
人をギヤフンと言わせることができるでしよう。 石塚孝幸 （18) 奈良県 


D, 0 

A V A 

A,E 

E. A 
HL f DE 
B f (HL) 

HL 

E v (HL) 

H し， <DATADR) 

HL f DE 

A % (CURXS) 

A 

NC,DATO し 1 
1，A 
E，A 
HL.DE 


AF f AF^ 

A t i 

(INTFA) V A 


BC f OPN 轉 1 
A t CTSADR 

fTIMER BF RESET 

000 OH 

000 OH 

000 OH 
(C>，A 

BC 

A f (TCC) 

|N0P»6 

(C> ,A 

C,0 

B f 0 

H し, DEEP 

HL,BC 

D 9 (HL) 

A 

(HL) 

ハし FONEX 

|COUNTER (BC REG) 

|DeEP-0?<LF0 OFF?) 

H し， 8TIMES 

I START TX«E-0? 

(HL) 

i. « w-r UO 1 M 

(HL) 

LFO^X 

I START TIME DEC 

HL f LFOPS 

HL f BC 

|8TTEP*0?(«0iLF0) 

Z f LFOLBl 

<HL) 

LFONEX 

|STEP DEC 

HL.STEP 

HL’BC 

A,<HL) 

HL, し POPS 
HL % BC 
<HL) V A 

慕 LFO STEP RESET 


HL,DEEPS 
HL $ BC 
A,(HL) 

D 

2,し FOUDH 
A,D 

Z, し FOUDH 
LF0LB3 
H し t LFOUD 
H し， BC 
A v (HL) 

(HL) f A 
HL, し FOUD 
HL,BC 
A,(HL) 

HL,DEEPS 
HL f BC 
A,(HL) 

<HL) f A 
E.A 

(LFOWK),A 
HL f FVFLQ 
HL，BC 
A 

<HL) 

Z, し FO し BF 


|-DEEPS-DEEP? 

|LFO UP DOWN CH 

I DEEPS-DEEPS^LFOLO) 


■し FOI«IK(E>HDEEPS 
ILFO F.NO OR T •し？ 


H し,し FOCON 

HL V BC 

DE f HL 


HL f TLEVEL 
H し, BC 


C f LFOL#l 

A,TLSADR 

A,C 

BC t 0PN#0 
LF0LB4 
A,T し SADR 
A，C 

BC f OPN#l 

AF 

A v (DE) 

D,A 

AF 

NC f LFOLBS 
000 OH 
000 OH 
000 OH 
OOH 
(C) V A 


IOP LOOP 
|N0P«7 


A v (LFOWK) 
A，<HL) 

(C) V A 


A,SADRSD 

NZ f LFOWLV 


1391 

1392 

1393 

1394 
1393 

1396 

1397 

1398 

1399 

1400 

1401 

1402 

1403 

1404 

1405 

1406 
140? 

1408 

1409 

1410 

1411 

1412 

1413 

1414 

1415 

1416 

1417 

1418 

1419 

1420 

1421 

1422 

1423 

1424 

1425 

1426 

1427 

1428 

1429 

1430 

1431 

1432 

1433 

1434 
1433 

1436 

1437 

1438 

1439 

1440 

1441 

1442 

1443 

1444 
1443 

1446 

1447 

1448 

1449 

1450 

1431 

1432 

1433 

1454 

1455 

1456 
1437 
1458 
1439 

1460 

1461 

1462 

1463 

1464 
1463 

1466 

1467 
1466 

1469 

1470 

1471 

1472 

1473 

1474 

1475 

1476 

1477 

1478 

1479 

1480 

1481 

1482 

1483 

1484 

1485 

1486 

1487 

1488 

1489 

1490 

1491 

1492 

1493 

1494 

1495 

1496 

1497 

1498 
149? 
1300 
1501 
1302 

1503 

1504 
1503 
1906 
150? 

1508 

1509 
1310 
1911 

1312 

1313 
1914 
1315 
1516 
131? 
1918 
1319 
1520 
1921 

1522 

1523 
1324 
1929 
1526 
1327 
1520 
1329 
1530 
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LFO WORK 

TCCx DEFB 
NOTE: ENT 

DEFS 

DEEPSt ENT 
DEFS 

STIMESi ENT 
DEFS 

LFOUD* ENT 
DEFS 
ENT 
DEFS 

ENT 
DEFS 
ENT 
DEFS 
ENT 
DEFS 
ENT 
DEFS 
ENT 
DEFS 
DEFS 
DEFS 
DEFS 


LFOPSt 

I 

DEEP: 

STEPi 

TLEVEL: 

FVFL6J 

LFOCONt 

LFOWKi 

NTFAi 

NTFB* 


OTOZUKURX WORK 

CURXSi DEFS 1 

CURYS* DEFS 1 

CURXSSx DEFS 1 

DATADR: DEFS 2 

NOBASUt DEFS 1 

KEYBi DEFS 1 

OCTi DEFS 1 

PARTNOr DEFS 1 

DATNOi DEFS 1 

； OTOZUDURI DATA 


DATCONi DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 

DATDATi DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
B 


08H 

08H 

08H 

OSH 

OCH 

OEH 

OEM 

OFH 

07H 

33 

BOH 

38H 


DEF1 

DEF1 


B 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DCFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

DEFB 

;INKEY DATA 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 
DEFB 


1FH 

23 

&OH 

1FH 


39 

31H 

5XH 

S7H 

33H 

43H 

34H 

S2H 


S5H 

38H 

49H 

4FH 


|TIMER CONTR COM 
|F.NO DATA 
•LFO DEEP NOW 
fLFO START WAIT LEFT 
|1-UP FFH-DOWN 
|LFO STEP COWNTER 

I DEEP (»0 LFO OFF) 

| STEP 

|T •し EVEL 

ILFO F.NO OR VR 

fLFO VR OP.HO. 

| WORK 
|INTF A 
|INTF Bs X-INT 

fHYOU NO CURSTO 

|HTOU CUR(OP DATA YO) 
|IMA NO DATA TOP ADR 
I NOBASU / NOBASANAI 
|KEY BF 
|OCTABU 
|PART NO. 

JDATA NO. 


iCONNO CR« 
(CONN1 
|CONN2 
;C0NN3 
|C0NN4 
jCONNS 
IC0NN6 
;CONN7 
;CONNECT 


► X 1 F の あとに 出たから XlturboII = XlG 。 ブラック 仕様は限定 だから limited 。 したがつ 
て XI turbo II = X 1 G — limited 。 オブシヨンでタイヤがついたりするわけはないな 一。 
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キヤリ キヤリフラグが立っている 

ノンキヤリキヤリフラグが立ってない 
ゼロ ゼロフラグが立っている 

ノンゼロ ゼロフラグが立ってない 


減少 .—01 H —♦• OOh—F 卜 h — FEh —.. 

NC.NZ NC.Z C.NZ NC.NZ 


增加 .-► FEh — FFh -^ OOh — 0 1 h —••• 

NC. NZ NC.NZ C.Z NC.NZ 


前回は LD ， CALL の 2 つの命令の使用法を解説しました。 Z 80 は 
レジスタという変数のようなものを持っていて，これに値を代入 
するのが LD の役目です。そして BASIC の GOSUB にあたるもの，こ 
れ t ^ CAL しです。「〇 ALL IFC 4 h 」 とやれは' 丨 FC 4 h 番 i 也力、らはじま 
るマシン語のサブルーチンを呼び出します。 S - OS の IFC 4 h 番地に 
は BEEP 音を鳴らすサブルーチンが入っていますから ， 「CALL 
IFC 4 hj を実行するとピツと音が鳴るという寸法です。 

/まずはフラグのお話 

. さて，今回は Z 80 でできる演算を解説します。演算は大きく 2 
つに分けることができ，それぞれ算術演算，論理演算と呼ばれて 
います。このうち論理演算については次号で扱うことにして，今 
回は算術演算を中心にフラグの話と合わせて講議を進めていきま 
しょぅ。 

演算を修得するときに決して避けて通ることができないものが 
あります。それはフラグです。フラグというのは旗という意味で， 
処理の流れを制御するという大切な役目を負っています。いわば 
マシン語プログラミングのキモにあたるもので，フラグの使い方 
がわかればマシン語の峠は越えたといえるほどです。「フラグを 
制する者はマシン語を制する」というわけです。 

レジスタは A 〜 L までありますが，それぞれのレジスタに入れ 
ることのできる数はいくつからいくつまでだったか覚えてますか。 
そう， 00 h 〜 FFh ですね。 

では， FFh に 01h を加えるとどうなると思います？ 本来なら 
FFh+01h = 100h となるところなのですが，実は FFh に 01h を加え 
ると 00 h になってしまうのです。これはどうしたことか，といいま 
すと，ご存じのようにレジスタには 16 進で 2 桁の数しか入れるこ 
とができません。そこで， FFh + 01h = 100h という答えの下 2 桁を 
とってきて 00 h となるのです。このとき，繰り上がりがあったよ 
(オーバーフロー）という意味で旗が立ちます（セツトされる）。こ 
れをキヤ.リフラグと呼びます。繰り上がりがなかった場合，キヤ 
リフラグは立ちません（リセツトされる）。反対に 00 h から 01 h を引 
くとどうなる力*。今度は FFh になってしまいます。 00h から 01h を 
引く。引こうにも 0 から 1 は引けませんね，そこで 100h — 01h = F 
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Fh として，1借りましたよ（アンダーフロー）というしるしに旗 
を立てます。これもキヤリフラグです。 

つまりキヤリフラグは，実際には存在しない仮想の3桁目に繰 
り上がりがあったとき，仮想の3桁目から1借りてきたときに立 
つといえます。 

もうおわかりかと思いますが，このようにレジスタの値を増加 
させていくと，…， FEh ， FFh ， 00h ， 01h ， •••と変わっていきます。減 
少させていくと，…， 00h ， FFh ， …のようになります。 

演算の結果，レジスタの値力 ? 00 h になることがありますね。この 
ときにも旗が立ちます。これがゼロフラグです。結果が 00 h にな 
らないときはゼロフラグはリセットされます。， 

レジスタの値を増加•減少させていくときの様子をまとめて図1 
に示します。いつ，どんなフラグが立つのか，ということに注意 
して見てください。 

前回のお話をよ一く読んで〈ださった方は，ここまできて「ね 
一ね一じゃあ HL とか BC はどうなの？」という疑問をお持ちにな 
ったでしよう。う〜んあなたは優秀ですね。レジスタペア， HL ， 
DE ， BC は000 Oh 〜 FFFFh の値しかとれないことはお話しました。 
ということは，やはり FFFFh の次は000 Oh なんですよ。ところ力 5 '! 
フラグは尋常ではない立ち方をします。命令とのかね合いもあり 
ますので，詳細は後述することにしましよう。 

/足し算，引老算 

Z 80の算術演算には次のようなものがあります。 

• 加算 ADD , ADC 

図1 値の増減とフラグの変化 


マシン語体操卜 2*3 Exercise Z 

St 算の極意は旗にあ0 


Izumi Daisuke 

泉大介 



CNCZN7 .， 















•減算 SUB，SBC 
• 増加 INC 
• 減少 DEC 


つてしまうのです。仮に 
LD A ， 1 

CALL PRTHX 


驚いたことに乗算，除算は用意されていません。乗算，除算を 
やりたいときには，自分でプログラムを組んでやらなければなら 
ないのです。この方法はあとで述べるとして，各命令の説明をし 
ていきましよう。 

加算⑴ 

— < 文法1 >-:- 

ADD A, m m は A~L，2 桁の 16 進数， （HL) 

ADD HL，rp 即は日 0,0£ ， ^4 し 


ADD はアドまたはアツドと読み，加えるという意味です。たと 
えば， 

ADD A , 20 h 

は ， A = A + 20h となります。加算した結果は必ず A または HL に 
入ります。 A と HL が特別に扱われているのがわかりますか？ 
ADD B，D 
ADD DE，BC 

という命令は存在しないのです。ですから 「ADD B ， D 」 をやり 
たければ次のような手を使わなければなりません。 

LD A，B 

ADD A，D 
LD B，A 

これで 「ADD B ， D 」 と同じ結果を得ることができます。 

足し算 ( add ) 


0000 




1 ； SAMPLE-1 


0000 




2 ； 



0000 




3 



8000 




4 

ORG 

800 OH 

8000 




5 

j 


8000 




6 PRINT ： 

EQU 

1FF4H 

8000 




7 PRNTS : 

EQU 

1FF1H 

8000 




8 PRTHX : 

EQU 

1FC1H 

8000 




9 

in 


8000 

06 

FF 


10 START : 

B,OFFH 

8002 

0E 

05 


11 

LD 

C,5 

8004 

78 



12 

LD 

A,B 

8005 

CD 

Cl 

IF 

13 

CALL 

PRTHX 

8008 

CD 

FI 

IF 

14 

CALL 

PRNTS 

800B 

3E 

2B 


15 

LD 

A,，+ • 

800D 

CD 

F4 

IF 

16 

CALL 

PRINT 

8010 

CD 

FI 

IF 

17 

CALL 

PRNTS 

8013 

79 



18 

LD 

A，C 

8014 

CD 

Cl 

IF 

19 

CALL 

PRTHX 

8017 

CD 

FI 

IF 

20 

CALL 

PRNTS 

801A 

3E 

3D 


21 

LD 

A ，，=， 

80 1C 

CD 

F4 

IF 

22 

CALL 

PRINT 

801F 

CD 

FI 

IF 

23 

CALL 

PRNTS 

8022 

78 



24 

LD 

A，B 

A,C 

8023 

81 



25 

ADD 

8024 

CD 

-Cl 

IF 

26 

CALL 

PRTHX 

8027 

C9 



27 

BBT 



先ほど，レジスタの値はぐるぐる循環するものであることを紹 
介しました。例1はこれを実際に目で見て確かめようというもの 
です。 START の部分で B と C に入れている値を適当に変えて試し 
てみてください。プログラム中でコールしているサブルーチンは 
S - OS 中のサブルーチンです。 

この中に注意すべきサブルーチンがあります。それは PRTHX 
です。6月号の P .39 の左上に説明がありますが，その欄を右にた 
どってください。レジスタ破壊のところが AF となっていますね。 
ということは，このサブルーチンをコールすると A の内容が変わ 


という プログラムを 組むとしますね。そうすると画面に01と表示 
します 力す， この時点で八メ1となり，次に 「ADD A ， 2」とか 
やると悲惨な結果を招いてしまうことになります。自分で プログ 
ラムを 組むときには，このレジスタ破壊にはくれぐれも注意して 
くださいね。 

例1と同じ手法を用いて，レジスタペア （ HL ， DE ， BC ) の値も 
循環するものであることを確かめることができます。各自挑戦し 
てみてください。 

減算⑴ 

f く文法2 >---:——:——:-:-:—— -1 

SUB m A=A-m 


SUB はサブまたはサブトラタトと読み，引くという意味の英語 
Subtract の略です。今回は 「SUB A ， m 」 とは書いてありませ 
んね。なぜかというと ， 「SUB HL ， r P j という16ビットの減算は 
用意されていないため ， 「SUB A ， m 」 とわざわざ書かなくても， 
「SUB m 」 だけでわかるからなのです。 

例1で15行と25行を以下のように書き換えてやれば，減算をし 
た場合のレジスタの値の変化を見ることができます。 

800 B 3 E 2 D 15 LD A ，， 一’ 

8023 91 25 SUB C 

加算⑵ 

く文法 3 >-- … . 

ADC A , m A = A + m + CY 

ADC HL’rp HL = HL + rp + CY 

CY はキャリフラグが立っているとき I ，そうでなければ〇 


この命令はアドキヤリまたはアドウイズキヤリと読みます。キ 
ヤリフラグが立っているときには，通常の ADD の答えにさらに1 
を加えるという動作をします。 


例 2 

I 

足し算 （ ADC ) 




0000 




1 ； SAMPLE-2 



0000 




2 ； 




0000 




3 




8000 




4 

ORG 

800 OH 


8000 




5 

； 



8000 




6 PRTHL : 

EQU 

1FBEH 


8000 




7 LETNL: 

EQU 

1FEEH 


8000 




8 




8000 

21 

FF 

01 

9 

LD 

LD 

HL.01FFH 


8003 

3E 

02 


10 

A, 2 

A=2 

8005 

85 



11 

ADD 

A,L 

A+=FF CY=1 

8006 

6F 



12 

LD 

LD 

L,A 

L=01 

8007 

7C 



13 

A,H 

A=01 

8008 

CE 

00 


14 

ADC 

A,0 

A+0+CY=2 

800A 

67 



15 

LD 

H,A 

H=2 

800B 

CD 

BE 

IF 

16 

CALL 

PRTHL 


800E 

CD 

EE 

IF 

17 

CALL 

LETNL 


8011 




18 

; 



8011 

21 

FF 

01 

19 

LD 

HL.01FFH 


8014 

11 

02 

00 

20 

LD 

DE,2 


8017 

19 



21 

ADD 

HL,DE 


8018 

CD 

BE 

IF 

22 

CALL 

PRTHL 


801B 

C9 



23 

RET 
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例 2 では 01FFh + 0003h をやって表示してみました。同じこと 
を 19 行以降でもやっています力 ? ，こっちは DE を壊してしまうとい 
うデメリットがあります。キヤリ付きの加算のメリットは，ほか 


のレジスタの値を壊さずに加算できるだけではありません。 


1 — 

一 








画例 3 


32 ビットの足し算 




0000 





1;SAMPLE-3 



0000 





2 ； 




0000 





3 




8000 





4 

ORG 

800 0H 


8000 





5 




8000 





6 PRNTS : 

EQU 

1FF1H 


8000 





7 PRINT ： 

EQU 

1FF4H 


8000 





8 PRTHL : 

EQU 

1FBEH 


8000 





9 




8000 

01 

34 

12 


10 

LD 

BC,1234H 

:夕，レルカス* 

8003 

11 

00 

FE 


11 

LD 

DE.OFEOOH 

； 1234FE00 H 

8006 





12 




8006 

CD 

39 

80 


13 

CALL 

0PRNT 


8009 

3E 

2B 



14 

LD 

A, ，+， 


800B 

CD 

F4 

IF 


15 

CALL 

PRINT 

; PRINT 

800E 

CD 

FI 

IF 


16 

CALL 

PRNTS 


8011 





17 

し 



8011 

ED 

53 

47 

80 

18 

(WORK),DE 

; (WORK)=E 

8015 





19 



；(WORK+1)=D 

8015 

ED 

43 

49 

80 

20 

LD 

(WORK+2),BC 

；(WORK+2 い C 

8019 





21 



；(WORK+3)=B 

8019 





22 

; 



8019 

01 

00 

00 


23 

LD 

BC,0 

； タスカス* 

801C 

11 

00 

02 


24 

LD 

DE, 020 OH 

； 0000020 0 H 

801F 





25 




801F 

CD 

39 

80 


26 

CALL 

0PRNT 


8022 

3E 

3D 



27 

LD 

A, ，=， 


8024 

CD 

F4 

IF 


28 

CALL 

PRINT 

;PRINT 

8027 

CD 

FI 

IF 


29 

CALL 

PRNTS 


802A 





30 

L 



802A 

2A 

47 

80 


31 

HL,(WORK) 

；HL= タサレ ル DE 

802D 

00 




32 

NOP 


； ナニモシナイ 

802E 

19 




33 

ADD 

HL.DE 

; CY =1 

802F 

00 




34 

NOP 


；ナニモシナイ 

8030 

5D 




35 

LD 

E,L 

D,H 


8031 

54 




36 

LD 

； DE = HL 

8032 

2A 

49 

80 


37 

LD 

HL,(WORK+2) 

: HL= タサレル BC 

8035 

ED 

4A 



38 

ADC 

HL,BC 

； HL+BC+CY 

8037 

8038 

4D 

44 




39 

40 

LD 

LD 

C,L 

B,H 

； BC = HL 

8039 





41 




8039 

69 




42 8PRNT : 

LD 

L,C 

H,B 


803A 

60 




43 

LD 


803B 

CD 

BE 

IF 


44 

CALL 

PRTHL 

； PRINT BC 

803E 

803F 

6B 

62 




45 

46 

LD 

LD 

L,E 

H,D 


8040 

CD 

BE 

IF 


47 

CALL 

PRTHL 

; PRINT DE 

8043 

CD 

FI 

IF 


48 

CALL 

PRNTS 


8046 

C9 




49 

RET 



8047 





50 




8047 

00 

00 



51 WORK： 

DEFW 

0 


8049 

00 

00 



52 

DEFW 

0 



例 3 では 32 ビット長の数の足し算， 1234FE00h + 200h をやって 


います。10行で BCDE に数を代入，表示したあと，18行で WORK 
にとっておきます。21行で再び BCDE に数を代入。この BCDE と 
先に WORK にとっておいた数の加算を29行から行い，答えを表示 
して帰ってくるというプログラムです。プログラム中の何力所か 
で 「CALL @ PRNT 」 とやっていますね。 @ PRNT というラベル 
は例3の終わりのほうにあるサブルーチンで，これは私が作った 
ものです。このようにすれば，自分で作ったサブルーチンをコー 
ルすることができるのです。何度も同じ処理を書くのはバカらし 
い上にプログラムも大きくなってしまいますからね。 

例3を見ておわかりのように，プログラム中に LD 命令の何と多 
いことか。続いて CALL 命令が多いでしょう？ 実際のプロダラ 
ムとはこんなもので，大半を LD ， CALL が占めています。先月， 

しょっぱなに LD と CALL をやってしまったのは，この辺の事情が 
あったからなのです。 

この例3を少し詳しく見てみましょう。最初に BCDE に設定し 
ているのは「足される数」です。次に @ PRNT をコールしています。 
ここで， BC と DE に入っている値を続けて表示しますね。後ろに 
スペースを表示して帰ってくるようにできています。「+」とスぺ 
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ースを表示したあとレジスタの内容を WORK にとっておきます。 
なぜ 「LD (WORK + 1), BC 」 としてないのか。先月号でお話し 
しましたね。思い出してください。 

次に再び BCDE に値を設定しています。今度は「足す数 j です。 
@ PRNT を コールして 表示したあと，「=」 を プリントしています。 

さて，ここからが今回の目玉です。 

「LD HL ，（ WORK ) j で先にメモリにとっておいた D E の値が 
HL に入ります。足される数の下 4 桁ですね。つまり HL = FE00h 
となります。これと DE を足してますね 。 HL = FE00h + 0200h = 
000 Oh となり，仮想の 5 桁目へ繰り上がりがあったよ，とキヤリフ 
ラダが立ちます（そう作ってあるのだ)。計算した結果を D E に戻 
して，今度は上 4 桁の計算に入ります。 

「LD HL，（WORK + 2)」 で HL = 1234 h になります。足す数の上4 
桁は000 Oh ですから， HL と足すと 1234 h ? いえいえ，繰り上が 
りがあったのを忘れてはいけません。繰り上がりを計算に入れる 
ために 「ADC HL ， BC 」 が使ってあるのです。今キヤリフラグ 
が立ってますから，文法3で CY =1 。HL + BC + CY = 1234 h + 

0 + 1 = 1235h o この値が HL に入ります。結果を BC に戻して @PR 
NT をコールすると，計算結果を表示します。下4桁の計算の結果 
繰り上がりがないときは？ CY = 0ですから HL + BC + CY = 
HL + BC ですね。自分で適当な数を「足す数」や「足される数」 

に設定してプログラムを追ってみてください。それほど難しいこ 
とではありませんのできっと理解できるはずです。 

途中2力所 NOP (ノーオペレーション，何もしない）が入れて 
ありますが，これは文法4のためです。プログラムの流れにはま 
った〈関係がないので，打ち込むだけ打ち込んだら，無視してく 
ださい。 

減算⑵ 

文法 4 ) - 

SBC A, m A = A-m-CY 

SBC HL，rp HL = HL-rp-CY 

CY はキヤリフラグが立っていると I, そうでないと 0 

これはサブキヤリ（サブウイズキヤリ，サブトラクトウイズキヤ 
リ）と読みます。今度はキヤリフラグが立っていると通常の SUB 
からさらに1を引きます。 

もうお気付きの方もいるでしよう。そうです， SBC には16ビツ 


































卜の減算もあるのです。ということは，キヤリフラグが立ってい 
ないとき， 「SBC HL , BC 」 は 「SUB HL , BC 」 （こんな命令 
はないんですよ）と同じ働きをしてくれるということではないか！ 
というわけで，単純に HL から BC を引きたいときには次のような 
手を使います。 

OR A 


を使います。 

10行からは A を3倍，17行からは H しを3倍しています。これは， 
AX 3 = AX 2 + A ， HLX 3 = HLX 2 + HL と考えて結構です。この 
方法に習って展開すれば、ある程度の掛け算なら作ってやること 
ができます。 

AX 2= A+A 


SBC HL , BC 

OR というのは次回説明する論理演算命令のひとつで ， 「OR A 」 
にはキヤリフラグをリセットする働きがあります。この手法を使 
えば糸屯粋に HL - BC を計算できるというわけです。 

例3の以下の行を変更すれば，32ビットの減算プログラムので 


きあがりです。 




8009 3 E 2 D 

14行 

LD 

A ，’ -， 

802 D B 7 

30行 

OR 

A 

802 E ED 52 

31行 

SBC 

HL , DE 


32行 

， 


8035 ED 42 

36行 

SBC 

HL , BC 


/定数倍の仕方 


プログラムを作っている最中に「ちょっとこの値を3倍させた 
いな」とか 「 B を10倍しておきたい」とか思うことがあるでしょう？ 
速い掛け算ルーチンを作るのは，実際うんざりするほど面倒なも 
のです。また，ちょっとした掛け算のために，わざわざそんな思 
いをするのもバカらしいことでしょう。そこで，簡単な掛け算（定 
数倍）の仕方をここで練習してみることにします。 

ADD A , A 

これは A = A + A をやる命令でしたね。視点を変えてみると，同じ 
ものを足すのは2倍するのと同じこと，つまり A = AX 2 と同じこ. 
とだということに気付きます。 

ADD HL，HL 
ADD HL , HL 

というように ADD を 2 回やると， 2倍したものをさらに2倍する 
わけですから4倍したのと同じことになります。 ADD を3回やる 
と8倍，4回で16倍。このように考えると64倍や128倍なんてす 
ぐに 1：' 'きますね。 

では，3倍するときはどうしましょう。3倍には例4のような手 


例 4 


0000 




i 

； SAMPLE-4 



0000 




2 

; 




0000 




3 





8000 




4 


ORG 

800 0H 


8000 




5 

PRTHX : 

EQU 

1FC1H 


8000 




6 

PRTHL : 

EQU 

1FBEH 


8000 




7 

LETNL : 

EQU 

1FEEH 


8000 




8 





8000 




9 

;A = A 

本 3 



8000 

3E 

01 


10 


LD 

A ， 1 

；A =1 

8002 

47 



11 


LD 

B,A 

；B = A 

8003 

87 



12 


ADD 

A, A 

；A *= 2 

8004 

80 



13 


ADD 

A,B 

；A *= 3 

8005 

CD 

Cl 

IF 

14 


CALL 

PRTHX 


8008 

CD 

EE 

IF 

15 


CALL 

LETNL 


800B 




16 

；HL = 

HL 本 3 



800B 

21 

00 

10 

17 


LD 

HL, 100 OH 


800E 

5D 



18 


LD 

E,L 

；DE = HL 

800F 

54 



19 


LD 

D,H 


8010 

29 



20 


ADD 

HL.HL 

；HL *= 2 

8011 

19 



21 


ADD 

HL.DE 

；HL *= 3 

8012 

CD 

BE 

IF 

22 


CALL 

PRTHL 


8015 

C9 



23 


RET 




Ax 3= Ax 2 +A 

Ax 4= Ax 2 x 2 

Ax 5= Ax 2 x 2 +A 

AX 9 = AX 2 X 2 X 2 + A (HL も同様） 

以上は，例 4 のように最初の A の値をほかのレジスタにコピーし 
ておいてやることで実現できます。試しに A X 9 をやってみると， 


例5のようになります。 



9倍 







0000 




i 

; SAMPLE-5 



0000 




2 

； 




8000 




3 


ORG 

800 OH 


8000 




4 

PRTHX : 

EQU 

1FC1H 


8000 




5 





8000 




6 

；A = A 

本 9 



8000 

3E 

01 


7 


LD 

A,1 

A =1 

8002 

47 



8 


tD 

B，A 

B = A 

8003 

87 



9 


ADD 

A,A 

A 本 : = 2 

8004 

87 



10 


ADD 

A,A 

A 本 = 4 

8005 

87 



11 


ADD 

A,A 

A 本 = 8 

8006 

80 



12 


ADD 

A,B 

;A 9 

8007 

CD 

Cl 

IF 

13 


CALL 

PRTHX 


800A 

C9 



14 


RET 



6 倍， 7 倍， 

10 倍もちよ 

っと工夫してやればほかのレジスタを 

1 個しか壊さずに実現してやることができます。 


6倍は， 


( AX 2 + A ) X 2 




7倍は, 


AX 2 X 2 X 2 —A 




10倍は， 


AX 2 X 2 X 2+ AX 2 




6 

9 

7， 8 倍 






0000 




1 

； SAMPLE-6 



0000 




2 

； 




8000 




3 


ORG 

800 OH 


8000 




4 


; 



8000 




5 

PRTHX: 

EQU 

1FC1H 


8000 




6 

LETNL ： 

EQU 

1FEEH 


8000 




7 





8000 




8 

；A = A 

本 6 



8000 

3E 

01 


9 


LD 

A,1 

A =1 

8002 

47 



10 


LD 

B,A 

B = A 

8003 

87 



11 


ADD 

A,A 

A *= 2 

8004 

80 



12 


ADD 

A,B 

A *= 3 

8005 

87 



13 


ADD 

A,A 

A *= 6 

8006 

CD 

Cl 

IF 

14 


CALL 

PRTHX 


8009 

CD 

EE 

IF 

15 


CALL 

LETNL 


800C 




16 

；A = A 

* 7 



800C 

3E 

01 


17 


LD 

A,1 

A =1 

800E 

47 



18 


LD 

B,A 

B = A 

800F 

87 



19 


ADD 

A,A 

A *= 2 

8010 

87 



20 


ADD 

A,A 

A *= 4 

8011 

87 



21 


ADD 

A,A 

A *= 8 

8012 

90 



22 


SUB 

B 

A *= 7 

8013 

CD 

Cl 

IF 

23 


CALL 

PRTHX 


8016 

CD 

EE 

IF 

24 


CALL 

LETNL 


8019 




25 

；A = A 

拿 10 



8019 

3E 

01 


26 


LD 

A,1 

A = X 

801B 

87 



27 


ADD 

A,A 

A *= 2 

801C 

47 



28 


LD 

B,A 

B = A 

801D 

87 



29 


ADD 

A,A 

A *= 4 

801E 

87 



30 


ADD 

A, A 

A *= 8 

801F 

80 



31 


ADD 

A,B 

A 本 =10 

8020 

CD 

Cl 

IF 

32 


CALL 

PRTHX 


8023 

CD 

EE 

IF 

33 


CALL 

LETNL 


8026 




34 


; 



8026 

C9 



35 


RET 
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と考えてプログラムしてあります。2倍は簡単にできるので，こ 
れをいかにうまく使うかが鍵となります。 

ここにあげた2〜10倍で，定数倍についてはまずこと足りるで 
しょう。 VRAM のアドレス計算に必要な40倍，80倍も，この方法 
を応用すればすぐに組めると思います。リストを見て自分で研究 
してみてください。 

く文法 5 >-- —— - 

IfsJC r r=r + l 「は， A 〜 L, (HL) 

DEC r r =r -1 ° 

INC rp rp = rp+l 

DEC rp rp=rp — I 


^ レジスタの値の増滅 

最後はレジスタなどの値を 1 増やしたり1減らしたりする方法 
です。 INC はインクリメント， DEC はデクリメントと読みます。 

今 A = 34 h だとしますね 。 「INC A 」 をやると A =35 h になりま 
す。ゼロフラグとキヤリフラダは？そう，どちらもリセットさ 
れます 。 B = 0 のときに 「DEC Bj をやるとどうなるでしよう。 

B は FFh となってキヤリフラグが立ちそうですね。 

HL = FFFFh とします 。 「INC HL 」 を行ったときのフラグの 
変化はどうなるでしよう。「キヤリとゼロのフラグが立ちます」と 
答えた方は今までの話を十分に理解なさっている方です。 

しかしながら，ここでちよっとやっかいな問題を持ち込まなけ 
ればなりません。冒頭で，「レジスタペアに対する演算ではフラ 
ダが尋常ではない立ち方をする」と述べたことを思い出してくだ 
さい。実は 「INC HL 」 をやってもフラグは変化しないのです。 
それだけではなく，先の 「DEC Bj でもキヤリフラグは変化し 
てくれません。 


LD HL ， 800 Oh 
LD DE , 800 Oh 
ADD HL，DE 

の結果 ， HL = 0000 h となりキヤリフラグが立ちます。ところが， 
HL が0になったにもかかわらずゼロフラグは立ちません。という 
より変化しないのです。仮にゼロフラグが立っているとすると， 
それは以前の演算で立っていたのがそのまま残っているというこ 
とになります。演算をする際には，表1をよく見て自分が使う命 
令に対するフラグの変化をよ〈調べて使うようにしましよう。 

誰もが一度はひっかかる命令が INC と DEC です。 

LD A ， FFh 
INC A 

をやると，当然ゼロフラグが立ちますね。それはよいのですがキ 
ヤリフラグは変化 X ません。もっと悲慘なのは 「INC rp」，「D 
EC rp 」 で，こっちはキヤリもゼロも変化しないのです。それじ 
やあどうやって0になったかどうかを判断するのか。これには定 
石があります。次回の講議の中でお話しすることにしましよう。 

今回は算術演算とフラグに重点を置いて進めてきました。フラ 
グがいつセットされ，いつリセットされるの力、。よく復習して自 
分のものにしておいてください。といってもすベて覚える必要は 
ありません。使うときに必ず確認するようにすれば自然と身に付 
きます。 

フラグが実際のプログラムの中でどのような役割を果たしてい 
るのか，ということは次講でお話しします。 IF 文に相当するアセ 
ンブリ言語，すなわち「もしキヤリが立っていたら〜番地に行き 
なさい」といったたぐいのものを解説するつもりです。次講が理 
解できればすぐにでも本格的なプログラムが書けるようになりま 
す。そのためにも，本講の内容を確実に把握しておいてください 
ね。 


フラグが変化しないというのは 
「INC HL 」 の前のフラグの状態 
がそのまま保存されるということ 
です。キヤリが立っていたら 「I 
NC HL 」 実行後もキヤリは立っ 
たまま，ゼロフラグが立っていた 
ら立ったまま，ということになり 
ます。今回解説した命令とフラグ 
の変化の対応表を表1にまとめて 
おきます。 


表1 算術演算とフラグの変化 



16 ビット演算 


キャリ 

ゼ ロ 

ADD H し， rp 

X 

• 

ADC HL，rp 

t 

X 

SBC H し , rp 

t 

t 

INC rp 

• 

參 

DEC rp 

參 

• 


$=変イ匕する 參=変化せず 


応 I 用 I プ I 口 I グ I ラ I ム 1(2$ 


あぎすとせねこダンプ y スト 

先月号の予告どおり，今回は「あきすとぜねこ」のプログラム 
です。誰もが一度は遊んだことがあるでしよう（でもないかな？）。 
遊び方を簡単に紹介すると，まず自分の名前を母音だけに直しま 
す。名前をローマ字で書いて， a ， i ， u ， e ， o を取り出して並べれば 
できます。泉大介なら「いういあいうえ」になりますね。次に， 

あ—1，い—2，•••お —5 のように数字.に直します。「いういあ 
164 Oh! MZ 1986.1. 


いうえ」は「2321234」となります。 

占いたい相手の名前も数字に直します。小泉今日子なら「5232 
535」ですね。そうしたら，下のように自分と相手の同じ数字をひ 
とつずつ消していきます。 

ZZZ 12^4 =1+24-4 = 7 

5 ZZZ 5 ,3" 5 =5 + 5 + 5=15 

残った数字を加えて出た数字，7と15がそれぞれの気持ちです。 
「あきすとぜねこ，あきすと.……」.と指を折りながら数えていく 































と， 7は「こ」，15は「あ」です。「こ」は恋人，「あ」は愛している， 
というわけでこの占いの結果は，「私こと，泉大介は今日子ちゃ 
んのことを恋人だと思っていて，今日子ちゃんは私を愛している」 
と判断するわけです。 

ではプログラムの説明に入ります。 

11行目から70行目までは前回のプログラムとほとんど変わりま 
せん。違うのは31行と33行でループカウンタをセットするときの 
値が変わっている程度です。 

大きな変更はサブルーチンにあります。まず FILL です力す，入 
力された文字列の最後の文字以降を 00 h で埋める機能のほ力、に，ァ 
スキーコードで 入って いる 数字を数値に直す作業もやっています。 
たとえば「1」は 31 h として入っているのですが，これを 01 h に 
直します。 

COUNT は前回，残った文字数を数える役割を負っていました 
力 ? ，今回は残った数を加えています。 

さて，124行に MESTBL というラベルがあるのがわかりますか？ 
ここが今回の目玉です。先月とはひと味違うテーブル参照の手 
法をお目に力 1 けましよう。 

図2は先月号で使った方法です。 EDFM の後ろのダブルクオー 
テーシヨンの中味は必ず6文字となるようにしましたので ， 「DE 
FB ODhj と合わせてひとつのメッセージは 7 バイトとなります。 
1番目力? ENGAGE ですから， NEGAGE の入つているアドレスに 7 
を足せば次のメッセージの先頭ァドレスを指しますね（図中 MES 
+14 の所)。それゆえ， A にメッセージの番号 (0 〜 5) を入れ，それ 
を 7 倍して MES に加えてやることで，表示したいメッセージの 
入っているアドレスを得ることができたのでした。 

今回の方法では， DEFM の後ろのダブルクオーテーシヨンの中 
味を何文字にしようとまったくかまいません。ではどうやってメ 
ッセージのァドレスを得るのか。ここで大きな役割を果たしてい 
るのがメッセージテーブル MESTBL です。 MESTBL から MES 
〇〜 MES 7 のメッセージが始まる先頭アドレスが順に並べて入れ 
てあります。つまり ， 「LD DE ，（ MESTBL )」 では DE に MES 0 
のアドレスが入り ， 「LD DE , ( MESTBL +6) j では DE に ME 
S 2 のアドレスが入るというわけです。 

このようなテーブルを設けることには，次のような意味があり 
ます。 

1) プログラムを個々のメッセージの長さに関係なく組むことが 
できる。 

2) メッセージは整序している必要がなく，またプログラム中の 
任意の場所に置くことができる。 

図 2 テーブル 參照 （ 1) 


MES 

DEFM 

“NULL ” 

DEFB 

ODH 

MES + 7 

DEFM 

"ENGAGE” 

DEFB 

ODH 

MES+I4 — 

DEFM 

"LOVE ，， 

DEFB 

ODH 

MES + 2I -> 

DEFM 

"BREAK” 

DEFB 

ODH 



反面，メッセージの長さに著しい長短の差がなく，かえってテ 
ーブルを設けるほうがプログラムが長くなってしまう場合には効 
力が半減してしまいます。状況と好みに応じて使い分けるのがよ 
いでしょう。 

さて，テーブル参照の方法ですが， プログラム 中81行からがそ 
のルーチンです。81行に来たときに A には n <0 〜 7) の値がセット 
されて います。 そこで A を2倍して DE にコピーしたあと， MEST 
BL に DE を足して います （86 行)。今 HL は「表示すべきメッセージ 
は何番地に入っているよ j という情報の入ったアドレス （MEST 
BL + 2 n ) を示していますね。そこで，87 〜 89行でその情報を DE 
にセットします。たとえば81行で A =1だとすると，89行に来た 
ときに DE = MES 1 となるのです。あとはメッセージを表示するだ 
けですね。 

一度だけの説明ではわかりづらいかもしれません。そんなとき 
には自分でこういうテーブル参照のルーチンを作ってみてくださ 
い。そうすれば，きっと意味がわかってもらえると思います。 

前回の恋占いに少し手を加えただけで，まった〈新しいプログ 
ラムになってしまいました。アイデアによってはもっとぉもしろ 
いものもできるでしよう。頑張ってみてください。 

先月の占いでは岡田有希子ちゃんとの相性はバッチリだった。 
にもかかわらず，今回の占いではただの「友だち」と出てしまっ 
た……。泉大介は失意してぉります。ま，一喜一憂も恋のうちで 
しょうね。 

というわけで，来月は愛の月， 2月。パ、レンタインデーの2月0 
愛の相性占い3部作の最後の作品をご披露します。これは，2人 
の名前を入れると相性は何％と表示してくれる優れものです。そ 
れではまた，来月。 

図 3 テーブル参照 （ 2) 


MES + 2 MES + 4 MES + 6 


MESTBL 

DEFW 

DEFW 

MESO : 
MES4 : 

MES 1 : MES2 
: MES5 : MES6 

: MES3 
: MES7 

MESO : 
MESI : 

DEFM 

DEFM 

:: ペ : 

DEFBODH 

DEFBODH 
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EQU 

EQU 

EQU 


CALL 

LD 

CALL 

CALL 

LD 

CALL 

LD 

CALL 

CALL 

LD 

CALL 

CALL 

L 


LD 

LD 


XOR 

LD 

LD 


INC 

DEC 


INC 

DEC 


LD 

CALL 

LD 

LD 


CALL 

LD 

CALL 


CALL 

CALL 

RET 


6 

7 GETL ： 

8 MSG ： 

9 LETNL ： 
10 

11 START ： 

12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 CMPR1 : 

33 

34 

35 CMPR2 : 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 NOTEQ ： 

46 

47 

48 

49 SAME ： 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 
61 
62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 PRTSUB ： 

73 

74 

75 

76 PRTSB1 : 

77 

78 

79 

80 

81 PRT ： 

82 


8100 53 55 
8108 4B 4F 
8110 00 00 
8118 42 4F 
8120 4D 45 
8128 20 47 
8130 4E 41 
8138 20 20 
8140 4C 20 
8148 00 00 
8150 00 00 
8158 00 


SUM: 07 00 541C 011C 86 9A ： B4 


83 


LD 

84 


LD 

85 


LD 

86 


ADD 

87 


LD 

88 


INC 

89 


LD 

90 


CALL 

91 


CALL 

92 


RET 

93 



94 

FILL ： 


95 


LD 

96 

FILL1 ： 


97 


LD 

98 


OR 

99 


JP 

100 


SUB 

101 


LD 

102 


INC 

103 


DEC 

104 


JP 

105 


RET 

106 


； 

107 

FILL2 ： 


108 


LD 

109 


INC 

110 


DEC 

111 


JP 

112 


RET 

113 



114 

COUNT ： 


115 


LD 

116 


XOR 

117 

COUNT1 : 


118 


ADD 

119 


INC 

120 


DEC 

121 


JP 

122 


RET 

123 



124 

MESTBL ： 

DEFW 

125 


DBFW 

llUi 



127 

128 

MESO ： 

MES1 ： 

DEFM 

DEFM 

129 

MES2: 

DEFM 

130 

MESS ： 
MBS 4: 

DEFM 

131 

DEFM 

132 

MES5 ： 

DEFM 

133 

MES6 ： 

DEFM 

134 

MES7: 

DEFM 

135 



136 

BOY ： 

DEFB 

137 

GIRL: 

DEFB 

138 



139 

MESB ： 

DEFM 

140 


DEFB 

141 

MESG ： 

DEFM 

142 


DEFB 

1.13 

MESB1 ： 

DEFM 

1-11 


DEFB 

145 

MESG1 ： 

DEFM 

146 


DEFB 

147 



148 

BN: 

DBFS 


149 GN ： DEFS 


E,A 

D，0 

HL,MESTBL 

HL,DE 

E,(HL) 

HL 

D t (HL) 

MSG 

LETNL 


B t 10 

A,(HL) 

A 

Z,FILL2 

，〇 , 

(HL),A 

HL 

B 

NZ.FILL1 


(HL) f A 

HL 

B 

NZ f FILL2 


B，10 

A 

A,(HL) 

HL 

B 

NZ,COUNT1 


"KIRAI” 

••SUKI” 

••TOMODACHI" 

••ZEKKOU” 

"NETSURETSU" 

"KOIBITO" 


0 

0 


ODH 

"BOY : H 
ODH 

"GIRL " 
ODH 

10 

10 


；MESSAGE TABLE 


DEFB ODH 
DEFB ODH 
DEFB ODH 

DEFB ODH 
DEFB ODH 

DEFB ODH 


"INPUT BOVS NAME” 

ODH 

H INPUT GIRL*S NAME” 


MBS0 ： MES1:MES2:MES3 
MES4 ： MBS5 ： MES6 ： MBS7 

"NULL" DEFB ODH 

••AISHITEIRU" DEFB ODH 
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8080 

9D 

8088 

7B 

8090 

5B 

8098 

AD 

80A0 

FE 

80A8 

20 

80B0 

F2 

80B8 

D4 

80C0 

44 

8008 

E2 

80D0 

01 

80D8 

C2 

80E0 

ED 

80E8 

5D 

80F0 

3A 

80F8 

: A4 

SUM: 


8000 

8008 

8010 

8018 

8020 

8028 

8030 

8038 

8040 

8048 

8050 

8058 

8060 

8068 

8070 

8078 


CD EE IF 
IF CD EE 
D3IF 11 
CD EE IF 
IF CD EE 
AO 80 21 
2145 81 
4F 811A 
C2 49 80 
8013 OD 
C2 35 80 
80 3210 
B7 80 32 
CD E8IF 
80113D 
1181 CD 


1FD3H 

1FE8H 

1FEEH 


LETNL 

DE^MESB 

MSG 

LETNL 

DEpBN 

GETL ； INPUT BOVS NAME 

DB.MESG 

MSG 

LETNL 

DE f GN 

GETL ；INPUT GIRL f S NAME 

LETNL 

HL.BN 

FILL 

HL f GN 

FILL 

HL V BN 

B.10 

C f 10 
DB.GH 

A f (DE) 

A 

Z,NOTEQ 
(HL) 

NZ,NOTEQ 
A 

(HL)，A 

(DE) f A 

SAME 


HL 


NZ r CMPRl 

HL,BN 
COUNT 
(BOY)，A 
HL.GN 
COUNT 
(GIRL),A 

DE f MESBl 

MSG 

A,(BOY) 
PRTSUB 
DE,MESG1 
MSG 

A t (GIRL) 

PRTSUB 

LETNL 


NC.PRTSBl 

A,7 


808F 

8090 

8092 

8095 

8096 

8097 

8098 

8099 
809C 
809F 
80A0 
80A0 
80A0 
80A2 
80A2 
80A3 
80A4 
80A7 
80A9 
80AA 
80AB 
80AC 
8 OAF 
80B0 
80B0 
80B0 
80B1 
80B2 
80B3 
80B6 
80B7 
80B7 
80B7 
80B9 
80BA 
80BA 
80BB 
80BC 
80BD 
80C0 
80C1 
8001 
80C8 
80C9 
80D0 
80D1 
80D1 
80D6 
80DD 
80E1 
80E7 
80EC 
80F3 
80F6 
80FD 
8104 


5F 

16 00 

21 Cl80 

19 

5E 

23 

56 

CD E8IF 
CD EE IF 
C9 


06 OA 

7E 

B7 

CA BO 80 

D6 30 

77 

23 

05 

C2 A2 80 
C9 


23 

05 

C2 BO 80 


05 

C2 BA 80 
C9 

D180 D6 80 El80 E7 
80 

EC 80 F6 80 FD 80 08 
81 

4E 55 4C 4C OD 
4149 53 48 49 54 45 
49 52 55 OD 

4B 49 52 4149 OD 

53 55 4B 49 OD 

54 4F 4D 4F 44 4143 

48 49 OD 

5A 45 4B 4B 4F 55 OD 

4E 45 54 53 55 52 45 

54 S3 55 OD 

4B 4F 49 42 49 54 4F 


49 4E 50 55 54 20 42 

4F 59 27 53 20 4E 41 

4D 45 
OD 

49 4E 50 55 54 20 47 

49 52 4C 27 53 20 4E 

414D 45 
OD 

42 4F 59 20 20 3A 20 
OD 

47 49 52 4C 20 3A 20 


00 00 00 00 00 00 00 
00 00 00 

00 00 00 00 00 00 00 
00 00 00 


SUM: 54 98 5F EF 5E 26 FI F5 



0000 

0000 

0000 

0000 

8000 

8000 

8000 

8000 

8000 

8000 

8000 

8000 CD EE IF 
80031112 81 
8006 CD E8IF 
8009 CD EE IF 
800C 1145 81 
800F CD D3IF 
80121123 81 
8015 CD E8IF 
8018 CD EE IF 
801B 114F 81 
801E CD D3IF 
8021 CD EE IF 
8024 

8024 2145 81 
8027 CD AO 80 
802A 214F 81 
802D CD AO 80 
8030 

8030 2145 81 
8033 06 OA 
8035 

8035 OE OA 
8037114F 81 
803A 
803A 1A 
803B B7 
803C CA 49 80 
803F BE 
8040 C2 49 80 

8043 AF 

8044 77 
804512 

8046 C3 4E 80 

8049 
804913 
804A OD 

804B C2 3A 80 
804E 
804E 23 
804F 05 

8050 C2 35 80 
8053 

8053 2145 81 
8056 CD B7 80 
8059 3210 81 
805C 214F 81 
805F CD B7 80 
8062 321181 
8065 

80651135 81 
8068 CD E8IF 
806B 3A 10 81 
806E CD 8180 
8071113D 81 
8074 CD E8IF 
8077 3A 1181 
807A CD 8180 
807D CD EE IF 

8080 C9 

8081 
8081 

8081 B7 

8082 CA 8E 80 

8085 3D 

8086 

8086 D6 07 
8088 D2 86 80 
808B C6 07 
808D 3C 
808E 
808E 87 


卜 2 あきす 


RPE u p D N D 
OJD s J A I A 


8 E C 

41 ( 


>4545544000 

>00721 


54554400000 

>2E 79250000 
*4424542200 

> D 9DA A o o 
-0443300 


272D5C03873DD55E 一 o 
7C1C1766BE56D 30 2 -1 


7 t 

o 一 


67EF009A0012DDA5 
D 85188 CB 88450454 

DC9EO 2021 DD99FDE 
331EBA8CEFO 44404 

070 DA 2050 oc 5149 D 
808CCCB0 88444540 

E61F 752366 C42D85 
8CC1BOC2DF 455045 

A018E 3560059993 F 
C82E 720888544444 

760DA73F1CE8BB1B 
B80C072ADE 444444 


8DF3D01EE57D11AF 
EC1DC 81 B40BC 8831 

D18D10A033D15DFE 

C8EC8A08C2C83C1E 

15D15DE 9201 F118D 
84C84CO 4188418 EC 

211 P11AA7A 5110 Do 
118428 oc 73428 1C8 

IF 31 FF67F 2111 All 
112114 OBAC 281388 
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85 年 10 月号に掲載した BASIC 塾第1期第6講では「音と光のフ 
アンタ ジー」と称して パソコングラフイクス 入門をしましたが， 
今回はもうちよっと突っ込んでみたいと思います。 パターン 絵画 
の 描き方と グラフの 作成法を研究しましよう。今月の内容はやや 
難しいので，中級者の方も臨時受講生として参加してください。 
スペシャルプログラムと して汎用 グラフ 作成 ソフ ト 「ぐら ふくん」 
を作ってみました。 

_ ; 基礎知識編 

’85 年 10月号の復習をとりあえずすませましよう。 パソコン ダラ 
フイ クスは，キャラクタ画面の操作と違って覚えることが 多い の 
で，改めてざっと一読してください。なお，本文中で MZ -1500 用 
S - BASIC は （ S 15) と表すことにします。 

① グラフイクス画面の用意 

BASIC 起動時には絵は描けませんので，次の命令文がプログラ 
ムのはじめに必ず必要です。 

( Hu ) SCREEN 0，0，0 : WIDTH 80 
( S 15) INIT “CRT : G ” 

② 点を打っ 

パソコンの 画面は横320 X 縦200ドットの小さな網目になって い 
ます （ MZ -1500 以外は 640 X 200 もある）。この座標，すなわちポジ 
シヨンは（右に何個目，下に何個目）で表します。左上隅が原点 
で (0, 0)，右下が (319, 199) です。点の打ち方は， 

( Hu ) PSET ( X ， Y ， C ) 

( S 15) SET [ C ] X , Y 

C は色番号で 0 の透明（黒），1の青から7の白まで8色あります。 

③ 2点間に直線を引く 

点（ XI ， Y 1) と （ X 2, Y 2) の間を直線で結ぶには， 

( Hu ) LINE ( XI , Y 1)-( X 2, Y 2)， PSET , C 
( S 15) LINE [ C ] X 1, Yl , X 2, Y 2 
とします。 

④ 長方形（水平に限る） 

対角線座標が( XI ， Y 1) と （ X 2, Y 2) である長方形は， 

( Hu ) LINE ( XI , Y 1)-( X 2, Y 2), PSET , C , B 
( S 15) B 0 X [ C ] X 1, Yl , X 2, Y 2 


です。これが， 

( Hu ) LINE ( XI , Y 1)-( X 2, Y 2), PSET , C , BF 
( S 15) B 0 X [ C ] X 1, Yl , X 2, Y 2, 色番号 

になると（色番号)で四角形の内部をぬりつぶします。 

⑤円 

( Hu ) CIRCLE ( X , Y ), R , C 
( S 15) CIRCLE [ C ] X ， Y，R 

これは点（ X ， Y ) が中心で，半径が R ドットの円の描き方です。 
以上で基礎段階が終わったことにします（さすがにツメタイ！）。 
なお，今回はあまり BASIC 問の移植方法を指摘しませ冬ので，こ 
の項を見ながら変換しましょう。この他は違いはでません。 

_ COS と SIN 

この項は数学，とくに SIN ， COS (サイン，コサイン）がわから 
ない人にとっては修羅場となります力' 意外とこれを読むことで， 
数学ができるようになるかもしれませんので心してください。 

まず，図1を見てください。点 B は点 A から20ドット離れてい 
ます。このときの点 B の座標はどうなるでしょうか。 

横座標は X h = X a + X =100 + X 
縦座標は Yb 二 Y a -Y = 100- Y (下向きがプラス） 

これはわかりますね。それでは X と Y はどうやれば求まるので 
しょう力*。こんなときに使うのが SIN ， COS なのです。 

いま直線 AB と水平線の間の角度が60°です。このときに，直線 
AB を水平方向に縮めるためにかける数が COS (角度)，上ド方向 
に縮めるためにかける数が SIN (角度）なのです。 


図 1 

2 。ク 

B(?，？）= (X b ，Yb) 

1 


/ 

\\ 


iA^ 

— ^ - ► 7k 平線 


X_ 

A(I00, 100) 

= (Xa，Ya) 

-- - - , 小^^永 
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ですから， 

X=AB * COS (60°) =20 * COS (60°) 

Y = AB*SIN (60°) =20 *SIN (60。） 

なのです。ところがここでさらに，角度の変換をしなければなり 
ません。 

パソコン ではほとん ど の場合，「ラジア ン」 という角度の単位を 
使っています。これは180°が円周率 ; r =3. 1415…に相当する不思 
議な単位系なのです。なんでこうなのかは私も詳しくは知りませ 
んが要は180°= 7 T ラジアンなのです。そこで 
( Hu ) ラジアン= ( 角度）* PAI (1) /180 
( S 15) ラジアン =( 角度）* tt /180 
という式で変換しなければならない，とだけ覚えてください。 

※注： HuBASIC でも tt が使えます 0 好きな方を使ってください。 

結局，図1の点 B の座標は HuBASIC では 
Xb =100 + 20 * COS (60* PAI (1) /180)=110 
Yb =100-20* SIN (60* PAI (1)/180) =82. 679492 
となるのです。 


まとめ 

点 （ X a ， Y a ) から右方向に対して Q 度の角度を作り R ドット離 
れた点 B の座標 （ Xb , Yb ) は 

Xb=X a + R*COS(Q*PAI(l )/180) 

Yb=Y a —R*SIN (Q*PAI(1) ハ 80) 

※注：数学では Y 座標の方向が逆なので SIN の前の符号は一では 
なく十になります。くれぐれも注意してください。 

PR 01. 円を描く 

CIRCLE 命令を使わずに円を描いてみよう。 

もういちど図 1 をみてみよう。角度は 60° になって いるが;，こ 
れが 0° から 360° までぐるっと 1 周すると点 B の跡はどうなるか。 
そう，円になるのです。図1の値を使ってプログラムを使ってみ 
もう一度図1をみてみましよう。先ほどのまとめとまったく同じ 
でしよ。 SIN,COS なんて簡単なんです。 


く PR01.〉 円を描く (HuBASIC) 


100 XA= 100 s YA=100s R=20 


110 SCREEN 0,0,0 

120 FOR Q=0 TO 360 

130 XB 二 XA+R 本 C0S(Q 本 PAI( 1 〉 /180 〉 

140 YB=YA~R 本 SIN<Q 本 PAI<1>/180> 


150 P! 
160 N1 


PSET(XB,YB 
EXT Q 



JEN 角形 

今月は頭のトレーニングです。次は正三角形を描いてみましよ 
う。もちろん3点がわかればつなぐだけですから問題はありませ 
んが'，わからないときは？ 

正三角形にも，外接（三角形をぴったりと包み込む）する円がひ 
とつあります。この円の中心 （ X 0, Y 0) と半径の長さ R がわかっ 
ているときは，120°ごとに円の中心 （ X 0， Y 0) から R だけ離れた3 
点をそれぞれ結ぶと正三角形が描けます。この場合は中心から右 
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に引いた軸と半径との中心角は A °, A °+120°, A ° + 240° になります 
から，3点の座標を計算して，順に直線でつないでいくわけで， 
このプログラム が PRO 2です。 


く PR02.> (HuBASIC) 


100 C し SO 

110 SCREEN 0,0,0 

120 DEF FNK(Z)=Z*PAI(1)/180 

130 X0=100 ： Y0=100 ： R=50 

140 N=3 ： A=90 ： C=1 

150 X=XO+R*COS(FNK(A)) 

160 Y=Y0-R* SIN < FNK(A)) 

170 FOR Z=1 TO N 

180 X1=X0+R 本 C0S<FNK(A+Z 本 360 /N > 〉 

190 Y ： l=XO_R 本 SIN<FMK( A+Z 本 360 /N> ) 
200 し INE< X,Yl>,PSET,C 
210 X=X1 ： Y=Y1 
220 NEXT Z 


正 N 角形 


PR03. 外接円の中心が （ XO ， Y 0), 半径 R のときの正 N 角形を描 
くプログラムを考えよう。 

答は PR 02 です。 A は初期角， C はカラー番号です。 

何ですって，ミスプリントではありませんよ。先ほどと同じく 
PR 02 が答です。つまり140行の N の値を入れ替えるだけでいい 
ように，始めから作ってあるのだ。 ハツハツハ。 

このように値を変数に入れておくと便利なのです。 

ところで中心の座標がわからなくても，点が進む方向がわかれ 
ば多角形は描けます。すなわち，点が図形をなぞっていくときは， 
その点は何かしらのべクトルを持っています。べクトルとは横方 
向と縦方向に進む長さを表す量のことですが，このべタトルを使 
つて正 N 角形を描く方法を PR 03 として掲載しましょう。 


く PR03. > 正 N 角形 (HuBASIC) 


100 C し S:SCREEN 0,0,0 
110 PRINT •• 拿カイシテ：/ラキメル 
120 INPUT " X="；PX 
130 INPUT •• Y= M ；PY 
140 INPUT •• 拿ナンカ，ケイテ '* スカ s" 5 N 
150 INPUT " 拿 へ : JJ ナカ _ サ ="5 只 
160 INPUT ••寒 CO し OR 二 "5C 
170 C し S 

180 A=2 拿 PAI<1>/N 

190 FOR Z*1 TO N 

200 VX=COS< A*Z > s VY=SIN < A 拿 Z > 

210 FOR X=0 TO R 

220 PX=PX+VXsPY=PY-VY 

230 PSET<PX,PY,C) 

240 NEXT X 
250 NEXT Z 
260 GOTO 110 

















この場合は開始点の座標さえわかればいいのです。あとは200 
行で計算したべクトルに応じて1辺ずつ順に点が跡を残しながら 
正 N 角形を描きます。そうです！ LOGO のタートルグラフイク 
スと同じですよ。 

PR 04. スピログラフ 

板にあいた大きな穴に小さな歯車をあてて，その歯車にあいて 
いる小さな穴にボールペンを差し込んでボールペンを動かすと， 
不思議なことに，美しいグラフイクスが描けますね。 

無謀にもこの不思議な図形をパソコングラフイクスで描きます。 
それが PR 04 です。 MZ -1500 ユーザーへの特別サービスとして， 
いつもと逆にしてみました。 

r く PR 04.〉 スピロ グラフ （ MZ -1500) ’ 

100 REM 拿拿拿拿窜スヒク~ラフ拿拿拿拿拿 

110 X 0 - 160 S Y0«100s R0=99s REM ソトノ iy 

120 R 1=60 a REM ナカノ エン ノ 

130 XX=50：REh ナカノ 1 ンニウ • リテ :/ <<R1> 

140 C=2SREM CO し OR 
150 N=10：REM カイテンスウ 
160 CLS 3SINIT "CRTsB" 

170 CIRCLE C7DXO,YO,RO 

180 CIRCLE C73X0+R0-R1,Y0,R1-1 

190 し INE[7 ： 1X0+R0-R1,Y0,X0+R0,Y0 

199 RT=19s し T=20sREM CHR — CODE 

200 CCOLOR,,3s CURSOR 0,23 

210 PRINT " 拿カイ！/テレノ イチヲ C<->] テ * キメ ‘•0K=I ： CR ： 1 M 

220 SETCO 3 XO+RO-R1 + XX,YO 

230 GET Z*sIF Z*="" THEN 230 

240 IF Z*=CHR*<13) THEN 340 

250 IF Z<=CHR*(RT) THEN DX=lsG0T0 280 

260 IF ZS=CHR ♦ 《し T> THEN DX=_lsG0T0 280 

270 GOTO 230 

280 SETC 7]XO+RO-R1+XX,YO 

290 XX=XX+DX 

300 IF XX<1 THEN XX=1 

310 IF XX>R1 THEN XX=R1 

320 GOTO 220 

330 REM === ROTATION START === 

340 C し SI 

350 CIRCLE CO3X0+R0-R1 , YO,Rl-1 

360 し INEC0 3XO+RO-R1,YO,XO+RO-1,YO 

370 QX=XO+RO-R1+X X s QY=YO 

380 FOR Z=0 TO 360 拿 N STEP 6 

390 A=Z*if/180 

400 PX 二 X0+<R0-R1>*C0S<A> 

410 PX 二 PX+XX 拿 COS (— A*RO/Rn 
420 PY 二 YO-(RO-Rl) 拿 SIN(A> 

430 PY=PY_XX 拿 SIN (— A 拿 R0/R1> 

440 し INECC3PX,PY,QX,QY 
450 QX=PXSQY=PY 
460 NEXT Z 

470 REM CIRCLE CODXO,YO,RO 

★HuBASIC 変更点(一部） 

199 RT=28 : LT=29 

200 COLOR 3 : CURSOR 0, 23 

230 Z$ = INKEY$ : IF Z$ = ““THEN 230 
^ 390 PAI(l)_ ノ 

110行から 150 行で必要な値を設定しています。 ( XO , Y 0) が板 
の円の中心座標。 R 0 が半径。小さな歯車の半径が R 1 です。 XX は 
歯車にあける穴の中心からの距離，そして C が色番号です。あら 
かじめ初期設定がしてありますので自由に値を変えて楽しんでく 
ださい。 

199行から320行まで字下げがしてありますが，この字下げした 
行はすべて，めんどくさい人は省略してけっこうです。なぜか？ 
それは実際に作ってみればわかります。 

ごく簡単に仕組みを説明しますと，歯車を円周に沿って A ° だけ 


スピログラフ 


反時計回りに回すと，歯車は逆の時計回りに A ° の （ R 0/ R 1) 倍，す 
なわち半径比倍回ることになります。この原理で380行から460行 
の間でボールペンの座標の動きを計算してプロットしています。 


クラフを描く 

いよいよ今月のメインテーマであるグラフ作成に突入します。 
企業でパソコンを事務処理に使っているときは，グラフ作成は欠 
かせないのですが，それに比べて家で個人がパソコンを使うとき 
はグラフは縁遠い存在です。あなた，一度でもパソコンでグラフ 
を描いたことがありますか。そこで私がコーチするのです。 
棒グラフを描く予備知識 
図2を描く方法を考えます。 

(いまわかっていること）原点0の座標， 0 P の長さ H ，0 Q の長 
さ 3* W , 阿部君の身長 Acm , 加藤さんの身長 BcmKA )。 

1. 座標軸を描く 

まず 0 P を引きましょう。0はいいとして， P の座標を求めます。 
0 P の距離は H とわかっていますので，縦座標は Y 0 — H となりま 
す。横座標は同じです。結局，点 P =< X 0, Y 0- H ) です。同様に 
点 Q =( X 0+3* W ， Y 0) となります。これを HuBASIC で指[くと 
LINE ( X 0， Y 0) - ( X 0， Y 0 — H )， PSET ， 7 (直線 OP ) 
LINE ( X 0， Y 0)-( X 0+3* W ， Y 0>， PSET ，7 (直線 OQ ) 

となります。 

2. 阿部君の身長を描く 

次に阿部君の身長を描き込むわけですが，このグラフ上の長さ 
を 0 P と同じにします。これも簡単で， A 1=( X 0 + W ， Y 0)， A 2 
= ( X 0 + W ， Y 0— h ) となりますから HuBASIC では 
LINE(XO + W ， Y 0> — ( X 0 + W ， YO - h ), PSET ，7 
となります。 

3. 加藤さんの身長を描く 

これが一番やっかいなのです。点 B 1， B 2 とも縦座標は X 0 + 2 *W 

図2 P 
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だとわかりますが，高さがわかりません。 

ここで阿部君，加藤さんとも本当の身長が A ， B だとわかってい 
ますから比の値をとると 

(阿部君の身長）：（加藤さんの身長 ） =A : B 

=( 阿部君のグラフでの長さ H ) :(加藤さんのグラフでの 

長さ Z ) 


となりますので A ： B = H ：乙です。わからないのは Z だけです 
が，比例式では（内項の積) =( 外項の積）すなわち A *Z = B * H で 
すので，結局 Z = H * A / B となります。したがって BASIC の文は， 
LINE ( X 0 + 2 * W ， Y 0) - ( X 0 + 2 * W ， YO-H * A / B )， 

PSET , 7 
となります。 

これで図2の絵が描けましたね。 

4. 棒グラフにするには 

実際には棒グラフという通り，棒で量を表現しますので，これ 
まで直線だった阿部君の身長と加藤さんの身長を，今度は棒に変 
えなくてはなりません。しかし，これは簡単です。棒の太さ V が 
わかればその太さ分だけ点 A 1 を右にずらせて LINE ， BF 文を使 
えばいいのですからこの場合，阿部君の身長を青い棒で表現す 
ると 

LINE(XO + W，Y 0) - < X 0 + W + V ， Y 0- H )， PSET ， 1 ，BF 
となります。加藤さんの場合も同様に V を第2項に加えるだけで 
いいのです。 

5. 実際の応用 

ここでは，阿部君の身長が加藤さんの身長よりも高いことがわ 
かりましたが，3人目以降が登場してくると，最も高い人をパソ 
コンで選出しなければなりません。これは次のようにします。 
DM = D (1) 

FOR X =2 TO N 
IF DM < D ( X ) THEN DM = D ( X ) 

NEXT X 

N は人数， D ( X ) は各自の身長です。そして先ほどと同様に 
Z = H * D ( X)/DM 

としてグラフ上の長さを調べます。グラフ作りも FOR 〜 NEXT 文 
で行います。 

さらに，比較棒グラフでは2種類以上のデータがでてきますの 
で，各データは D (データの種類，データの番号）のような配列 
に納めます。では今の説明がサツパリわからなかった数学オンチ 
の人でも，楽に使える汎用棒グラフ作成ソフトをプレゼントしまし 
ょラ〇 

PRO 5. 棒グラフ作成ソフト 

データの種類は丨か2,データ数は最大12です。たとえば毎日 
の貯金を前年同月比と比較するグラフが描けます。 

EP ? れ線グラフと円グラフ 

次は折れ線ダラフですが，折れ線グラフと棒ダラフの違いは棒 
をたてる代わりに点を打ち,各点の間をつなぐだけです。 

これまた汎用折れ線グラフ作成ソフトを PR 06 として掲載して 
おきますので，先ほどの棒グラフとの違いをよく観察してみてく 
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く PR 05.〉 棒グラフ （ HuBASIC ) 


100 REM 拿 * 拿寒拿 DATA-INPUT 本本本本♦拿本 
110 INPUT " 拿テ '' 一 7 ノ La ルイ I 、 < 1/2) ：" 5Y 
120 INPUT _• 本テ'*ーヲノ カス **< 1-12) s" 5 T 
130 DIM D(Y,T):C し S 
140 FOR Z=1 TO Y 

150 CURSOR < Z-l> 拿 20 ,0:PRINT ••拿 ITEM No. " ；Z 

160 FDR X=1 TO TsGOSUB 210:NEXT X 

170 CURSOR 0,22 ： INPUT ••拿 MISS No• < すシ =0> : ; X 

180 IF X=0 THEN 200 

190 IF X>12 THEN 160 

195 GOSUB 210SG0T0170 

200 NEXT Z ： G0T0 249 

210 CURSOR <Z — 1> 拿 20,XSPRINT ••拿 DATA'* 5X ； 

220 INPUT "=" ； D(Z,X) 

230 RETURN 
249 REM 

400 REM 寒拿拿拿 * BAR-GRAPH ♦♦ 本 ** 

410 SCREEN 0,CS0:C し S 

420 W0=240 : W=W0/T ： H=128 

430 X0=40 ： Y0=160 ： DM=0 ： C=3 

440 し INE(X0,Y0>-<X0,Y0-H 〉 ,PSET,1 

450 し INE(X0,Y0 〉一 < XO+WO,YO),PSET,1 

460 FOR Z=1 TO Y 

470 FOR X=1 TO T 

480 IF D<Z,X)>DM THEN DM=D(Z,X) 

490 NEXT X,Z 

500 DN=INT ( し 0G<DM>/ し 0G( 10〉 > 

501 D し =INT<DM/10ADN 〉 sDK=D し拿 lO^DN 

502 FOR X=0 TO DK STEP lO^DN 

503 DJ=Y0-H*X/DM 

504 し INE(X0-5,DJ)-< XO,DJ),PSET,7 

505 NEXT X 

510 FOR Z=Y TO1 STEP -1 
520 GOSUB 550 
530 NEXT Z 
540 GOTO 999 

550 FOR X=1 TO T：REM —— SUB BAR - 

560 し INE<X0+(X-.5) 拿 W+Z 拿 3,Y0)-(XO+X 拿 W+Z 拿 3,YO 
一 D<Z,X 〉 拿 H/DH>,PSET,C,BF 
570 NEXT X ： C=1 
580 RETURN 
999 REM END 


(注）次の折れ線グラフ PR 06 .と円グラフ PR 07 .について，100行 
から249行まではこの PR 05. をそのまま使います。 


ださい。 

円グラフはちよっと様子が違います。次の要領で描きます。 

1. 円をネ ffi く 

まず円の中心の座標0 ( XO , Y 0) と半径 R を決めます。そして 
CIRCLE 文で円を描きます （870 行)。 

2. データの合計を求める 

棒グラフや折れ線グラフは各データの量を比較するグラフです 
が，円グラフは各データが全体のうちどれだけを占めるかを調べ 
るものです。ですから，各データの合計を FOR 〜 NEXT 文で求め 
なくてはなりません。 

この合計値 D が円の全周2 * PAI (1) ラジアン値に相当するの 
で，各データに割り当てられるラジアン値は 
D ( X )/ D * 2 * PAI ⑹ 

となります。 

3. 円に線を引く 







そして円の中心から各値に割り当てられた角度まで，順に線を 
引いていきます。ところで基線は中心から真上に引いた線ですか 
ら，角度では90°=冗/2ラジアンとなるので，この値を先ほどの 
割り当て値に加えて，あとは LINE 文で半径を引いていきます。 

この手法については PR 06 :汎用円グラフパッケージを調べてく 
ださい。 


く PR06 . > 折れ線グラフ （ PR05 .の 1 〇〇 〜 249 行を追加） 

600 REM 拿本本本本 LINE-GRAPH 本本本本本 

610 SCREEN 0,0 ,OsC し S 

620 W0=240 : W=W0 / T s H= 128 ： C= 1 

630 X0=40 ： Y0=160 ： DM=0 

640 し INE<X0,Y0>-<X0,YO-H 〉 ,PSET,7 

650 し INE(X0,Y0)-(X0+W0,Y0),PSET,7 

660 FOR Z=1 TO Y 

670 FOR X=1 TO T 

680 IF D(Z,X)>DM THEN DM=D< Z,X) 

690 NEXT X,Z 

700 DN=INT 《し 0G<DM>/ し 0G<10)> 

702 D し =INT(DM/10^DN 〉 ： DK=D し拿 10 •へ DN 
704 FOR X=0 TO DK STEP lO^DN 
706 DJ=Y0 - H»X/DM 

708 し INE<X0 - 5,DJ 〉 -<X0,DJ>,PSET,7 

709 NEXT X 

710 FOR Z=1 TO YsGOSUB 730：NEXT Z 
720 GOTO 999 

730 FOR X=1 TO TsREM —— SUB LINE —— 

740 PX=X0+(X — 拿 WsPY=Y0_D(Z,X)*H/DM 

750 IF X=1 THEN QX=PX ： QY=PY 

760 CIRC し E(PX,PY 〉 ,1,C 

770 LINE<PX,PY>-<QX,QY>,PSET,C 

780 QX=PX ： QY=PY 

790 NEXT X ： C=3 

799 RETURN 

999 REM END 


く PR 07• > 円グラフ （ PR 05 .の彳00〜249行を追加） 

800 REM 本本本本本 CIRCLE-GRAPH 本本本本本 

810 SCREEN 0,0 ,0:C し S 4 

820 X0=150 ： Y0=100 

830 R=50 ： D=0 

840 FOR X=1 TO T 

850 D=D+D(1,X) 

860 NEXT X 

870 CIRC し E<XO,YO 〉 ,R,7 

880 FOR Z=0 TO T-l 

890 DO=DO+D(1,Z) ： A=PAI( 1 〉本 DO 拿 2/D 

900 X = XO+R 本 s Y=YO_R 拿 CC3S( A) 

910 し INE<XO,Y0 〉 -<X,Y 〉 ,PSET,7 
920 NEXT Z 
930 GOTO 999 
999 REM END 


今月のプロクラム：ぐらふくん 

ここまで棒グラフ，折れ線グラフ，円グラフを描く汎用ソフト 
を紹介してきましたが，集大成となるのがこの「ぐらふくん」で 
す。データを入力後， メニュー として表示されるグラフスタイル 


ら研究してきた PRO 5〜7と残り PR 07 の合成体なのです。もし 
PR 04 から PR 06 までをセーブしていた人は次の方法で合成して 
ください。 

MERGE 

テープやディスクにセーブしたプログラム F $を，いま使って 
いるプログラムに合成するときの命令。 

MERGE "ファイル名” 

(方法）マージするプログラムを SAVE " Filer , A としてセ 
ーブする。次にマージされるほうのプログラムをロードして 
MERGE “ Filel ” で2つのプログラムを合体させる 0 なお， 

この機能のない BAS 1 C の場合は必殺画面マージ（画面を使 
って マージすること）を使おう。 

いやはや，今月は大盛りというか2回分というか，あまりの盛 
りだくさんの内容で私は疲れてしまいました。 


今月のプログラム：ぐらふくん 

このプログラムに PR 05 .〜7.を MERGE してください0 


105 

106 
250 
260 

270 

280 

290 

300 

310 

320 

330 

340 

390 

509 

950 

960 

970 

1000 

1010 

1020 

1030 

1040 

1050 

1060 

1070 

1080 

1090 

1100 

1110 

1120 

1200 

1210 

1220 

1230 

1240 

1250 

1260 

1270 

1280 

1290 


INPUT "> フ 7イルカ ラ 3=7 スカ （ Y/N> s" 5ANS 擊 
IF ANS$="Y" THEN Q0SUB 120 0:GOTO 250 


REM 拿本拿拿拿 MENU 本拿拿本拿 


C し S 4 sCURSOR 5,0 SPRINT "拿 GRAPH-STYLE 
MENU 


CURSOR 0,2: PRINT ••1• 
CURSOR 0,4:PRINT _.2. 
CURSOR 0,6:PRINT "3. 
CURSOR 0 ,8SPRINT "4- 


BAR-GRAPH" 

LINE-GRAPH" 

CIRCLE-GRAPH" 

BAR 8< し INE — GRAPH" 


CURSOR 0,12 

INPUT "拿 SE し LECT No.="；ANS 


IF (ANS<1)0R<ANS>4) THEN 310 


ON ANS GOTO 400,600,800,400 
GOTO 310 

IF ANS=4 THEN 950 
REM 拿拿拿 BAR & LINE 拿拿 t 拿拿 
Z=1 ： G0SUB 550 
Z=2sG0SUB 730 
REM ♦ 拿拿拿拿 OPTION 拿拿拿拿 * 

INPUT "> フ 7 イル Y/N) ：" ； ANS* 

IF ANS*C>"Y" THEN 1120 

INPUT "拿 FILE NAME = M ；Ft 

OPEN "0", 轉 1 ,厂拿 

PRINT#1,Y 

PRINT#1,T 

FOR U«1 TO Y 

FOR V=1 TO T 

PRINT#1,D(U,V) 

NEXT V,U 
C し OSE 特 1 
END 

INPUT "拿 FILE NAME = M ； F» 

OPEN "1", 轉 1, ド $ 

INPUT 轉 1,Y 
INPUT#1,T 
DIM D(Y,T) 

FOR U=1 TO Y 
FOR V=1 TO T 
INPUT#1,D(U,V) 

NEXT V,U 
C し OSE#is RETURN 


を選ぶと，そのグラフを描いて終了します。せっかく入力したデ 
ータですから，記録しておきたいときは， ファイル としてテープ 
やデイスク， QD に記録できます。 

ところで初の試み！ なんと，この「ぐらふくん」は先ほどか 


★ S-BASIC 1500用変更点(一部） 
1040 W 0 PEN # l , F $ 

1210 R 0 PEN # l , F $ 
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圍剛 


詩人になりたいひとのプログラム. 

I ザ•コピーライタ 

Kudo Makoto 

エ藤誠 

近ごろアイデアが貧困でとお悩みのあなた，発想の転換に最適のプログラムがこれです。言葉 
と言葉の組み合わせは無限に近く，パソコンによって次々に生み出されるコピーの連続に，今ま 
での固定観念はぶっとびとなるでしよう。 


星は淋しく冷たい 
淋しい雨よ 

輝きは若い初恋のようだ 
淋しい雨よ 
空は哀しく儐しい 
過去は銀河を教れる 
蛍のように iz — ラー服は遊ぶ 
花は淋しい涙のように 
月が蒼く冷たい 
過去は銀河を引き裂く 
星は蒼く眠る 
夜空の虚しい輝きよ 

XI NEW BASIC 作 

これはいわゆるコピーや詩を作成するプ 
ログラムで，ようするに品詞のパターンを 
作ってその品詞ごとにランダムに言葉を選 
ぶプログラムです。使い方は簡単で，メニ 
ユーの選択は詩の作成と終了のみ。詩を画 
面に表示したあとは，プリンタ出力の有無 
を聞いてきますので，好きな行，あるいは 
すべての行を印字することができます。 

このプログラムでは，作られた文中の単 
語間には，何も関係はありません。すべて 
ランダムに選ばれます。当初は，それぞれ 
の単語に指向性をつけることも考えました。 
たとえば，「雨」に対して， 「 P 華る」などの 
勋詞や「強い」などの形容詞が対応するよ 
うな形です。しかし，そのように使う単語 
に制限をつけると，同じような文句ばかり 
並んだりしますし，何よりも人間の常識を 
超えるような文句は出てこなくなります。 

そこで単語はすべてランダムに選ぶように 
しました。半分ぐらい力 ? ，わけのわがらな 
い文になります〇「瞳はまったりと眠る」「レ 
モンの逢いたい波」などは，なんだかよく 
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わかりません。しかし，ランダムだからこ 
そはっとするような文句（コピー）も出た 
りするものです。 

具体的にどのように使えるかを考えてみ 
ましょう。まず，単語データに，およそ詩 
には似つかわしくない単語を多くまぜて， 
出てくるとんちんかんな文句を数人で見て 
笑いころげる。これは健康にいいと思いま 
す。ある特定の単語をデータに多く入れて 
おくと，出現回数が多くなりますので，あ 
る一定のテーマについての文句を作ること 
ができます。これを利用して，標語などを 
作ることも可能です。•たとえば，車，走る， 
歩く，危い，などの単語を多くすると，交 
通安全の標語が作れそうですね。また，あ 
る商品の特長をデータに多く入れておくと， 
意外な名コピーが作れるかもしれません。 
近ごろのコピーはわけのわからないのが多 
いので，十分このプログラムでも対抗でき 
ます。というのはもちろん冗談です。しか 
し，好きな行を1行だけ印字できるという 
のは，はっきり言ってコピー作成を意識し 
てつけた機能です。ようするに，このプロ 
グラムは10000行以下のデータを変えるこ 
とによって，作る文の雰囲気を変えること 
ができるのです。イメージが暗い単語を多 
くしますと，暗い詩ができますし，逆だと 
明るい詩になります。また，有名な詩人の 
詩の中からデータを選んで入力すれば，た 
とえば北原白秋 M とか，高村光太郎風の詩 
ができるかもしれません。また，何かのア 
イデアにつまったときにも使えます。正 
常な文中ではまず絶対に組むことがない単 


語がひとつの文中に続いて出たりします。 
たとえば，「花は飛ぶ」などの類です。これ 
などは発想の転換をはかったりするのに使 
えそうです。 

次に，データの拡張について述べます。 
データは10000行以下に，名詞，動詞，形 
容詞，形容動詞，副詞，その他の順に入っ 
ています。各品詞のデータの終わりには， 

を入れておいてください。形容詞は， 
「〜い」の形で，形容動詞は「〜だ」の形で入 
れておいてください。この2つは，以下に 
続く言葉によって語尾を変化させます。動 
詞は変化させていないので「生きる」「生 
きている」のように，いろいろな形で入れ 
ておいてください。 

サンプル 

3V ラ A t —ラーフ9ラ*' 

ルカ □ I、力:！ラ'* 

ツメヲイラーフク 

ヤ宇 tr ソラヲ 1，7 リ オモウ 
そエルI、"ノ□イ3 
卜中メクカカ"ヤ宇3 
ソラ八□ウ U ウト7イライ 
3ソ~ラノ3ウニ E/3 ウシ* 3 I、ラ" 
t ーラーフ7 I、977ククライ 
オモイテ'* I、ワカ'* 77ザ'* 

tr rz ヲト亨メク 
コ イシイ 3ソ■ラ 

3V* ラノ 3ウニ"ノ中I、シ3ウネ：/ラ'* 

八"ノ□イカ" 7••ラリト□イシイ 
ナカ*レ Jt ユウヒ》、トフ * 

八"ノコイノ3ウニI、"ノコイヲカイ 
ツ中八 AT ヲテラ!/テイ‘ 

ワラウカカ-ヤ字 a メ 1 r メル 
71 m : rt *7 シイ t 卜* 

••Jt I) ス肀"サ，ザ 

东ヲルI、フシ乎*: r シ a ウネ：/ ノ3ウラ* 

シ3ウシ~3八シ□イ 
7 W A 7カルイ 
T5 カナシイ 

中'*ン tr I、チ，!！^ヴニ7ソフ " 

ソラI、ラ-中シメ JI 
tJD ノ 7メ 》、 t レイ，'* 

シ a ウネ:/ tr 厶ナシクト字メク 

力□ノオそウ A7 3 

7オイレモンI、 つ71イ 

tltTT 宇ノツ宇 A サヒ'•シイ 

力 tTt 中ノ3ウニシ3ウ L/-3 I、7カルイ 










もともと人工知能シミユレーシヨンのつ 
もりが日本語を作成するプログラムと言っ 
たほうがいいようなプログラムになりまし 
た。できる人は解析して，拡張してみてく 
ださい。文のパターンは， REM 文で PAT 
〜と書かれている部分で作られていて，大 
まかに8つに分かれています。パターンの 


内容は変数 L $ 中に， A 〜 N の文字として 
扱われています。その文字が，順に，名詞， 
動詞，形容詞，形容動詞，副詞，が，は， 
だ，のようだ，のように，の，を，よ，の 
各品詞や助詞に対応しています。 L$=“A 
GB ” なら，（名詞）+「は」 + ( 動詞)，たとえ 
ば，「星は遊ぶ」などの文になるわけです。 


文の形はもっといろいろ考えられますので， 
パターンの拡張をしてみてください。その 
他，単語に〇〜9の，例えば楽しさや明るさ 
のパラメータをつけて，暗い詩，明るい詩 
を作れるようにすれば，より人工知能に近 
くなるのではないでしようか。ぜひ挑戦し 
てほしいと思います。 



1000 PRINT" 拿本本 * 本本本本 * 木木本本本家家本本本本 # 本*家 
1010 PRINT •• 本シシ •' ンニア《ノライ ver. 1,1 本 
1020 PRINT " 寒 by M.Kudoh 本 

1030 PRINT" 本拿本本本本本本本本*拿本本本本木本本本本寒本本 
1040 DIM TA$<4,255),GY$<11>, ： ^(7> ， MX<4> 

1050 FOR 1=0 TO 7 : READ (I) : NEXT 
1060 FOR 1=0 TO 4 
1070 J=0 

1080 READ 

1090 IF T$< THEN TA$ (I, J) =T«: J=J + 1 : GOTO 1080 

1100 MX(I)=J-1 
1110 NEXT 
1120 J 

1130 PRINT: PRINT" =====<< MENU >>====='• 

1140 PRINT! PRINT" 1. シサクセイ •• 

1150 PRINT" 2. オシ 7 ィ " 

1160 K=Is PR I NTs INPUT "7 ウシ ' 1 ラニヨウリ a クシテクラ*サイ 
1170 ON K GOTO 1240,1210 
1180 GOTO 1130 
1190 ’ 

1200 ’ END 

1210 END 
1220 ’ 

1230 ， V サ 7t イ 

1240 FOR 1=0 TO 11:GY$( I >*_"•: NEXT 

1250 FOR LN=0 TO11 

1260 し $= n, _:P=INT(RND(l> 拿 8>+l 

1270 ON P GOSUB 1440, 1510,1580,1660,1720,1790,1840,1930 
1280 GOSUB 1990 
1290 NEXT LN 
1300 ’ 

1310 PRINT 

1320 FOR 1=0 TO11 

1330 PRINT RIGHT$(STR$(I + 1),2) ; " . ; GY$ < I > : NEXT 

1340 PRINT: INPUT" Printer ニシ 3 1 リリ a ク ? (Y or N) ",K* 

1350 IF <1<$< ； >" 丫 "> 本（ »<$<>" ゾ "> 拿 <»<$<> ,, ン ,， > THEN GOTO 1130 
1360 N=0: INPUT" : T ： / 中-ヨウメ ? tT ンフ -_ • .Only CRET3 n , N 
1370 IF (N<0)+(N>12) THEN GOTO 1310 
1380 10=0:11=11:IF N<>0 THEN I0=N-1:I1=N-1 
1390 FOR 1=10 TO II 

1400 し PRINT GY * ⑴ 3 PRINT/P GY$(I> 

1410 NEXT:GOTO 1310 
1420 » 

1430 11 PAT 1 

1440 N=INT(RND(1)*100) 

1450 HI=ABS(69 本 （ N<=5> +68 本（ N>5 )拿 <N<=20)+67 拿 （ N>20> 拿 （ N く =60)+66 拿 <N>60> > 
1460 し $= し $+CHR ，（ HI>+"A" 

1470 IF INT<RND(1> 拿 2〉=0 THEN し $= し $+"M" 

1480 RETURN 
1490 , 

1500 » PAT 2 

1510 し來=し $+_ ， A"+CHR* < I NT (RND(1) 拿 2 〉 +70) 

1520 N=INT(RND(1)*10) 

1530 HI=ABS(69*(N<=3)+68*<N>3> 本 <N<=6 〉 +67 本 > 

1540 し $= し * +CHR$(HI)+CHR«(INT(RND(l)*3)+65) 

1550 RETURN 
1560 y 

1570 ， PAT 3 

1580 し ♦= し * +CHR*(65,71 〉 

1590 N=INT<RND(1> 本 100〉 ：IF N>=20 THEN 1610 
1600 し东 = し "AH"s RETURN 

1610 HI=ABS(68*<N>=20)*(N<=40)+67* (N>40) 本 （ N<=70> +66* (N>70) ) 

1620 し $= し 

1630 RETURN 
1640 9 

1650 ’ PAT 4 
1660 GOSUB 1580 

1670 IF RIGHT$(L*，THEN L$=LEFTt(L*,LEN(L*)-1) - ► n K M 
1680 し $= し $+"A"+CHR$(INT(RND(l) 本 2> +73> 

1690 RETURN 
1700 ， 

1710 ， PAT 5 

1720 N=INT(RND ⑴拿 10> 

1730 HI=ABS(68* <N く =2>+6<b 本 (N>2) * <N く =5>+<b7 本 (N>5) ) 

1740 し $= し $+CHR$(HI> 

1750 GOSUB 1580 
1760 RETURN 
1770 J 

1780 9 PAT 6 
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1790 し ♦= し* +"AJ" 

1800 GOSUB 1580 
1810 RETURN 
1820 ? 

1830 , PAT 7 

1840 IF INT(RND(1)*2)=0 THEN 1870 

1850 GOSUB 1580:IF MID*(L*,3,1)<>"B" THEN 1890 

1860 GOTO 1880 

1870 GOSUB 1510:IF MID*< し 4,1 〉 <>"B" THEN 1890 
1880 し $= し EFT $ (し 2> し 1 _+RIGHT$ (し♦，し EN (し -2 )：RETURN 

1890 し (INT(RND<1> 拿 2> +70)+"ALB" 

1900 RETURN 
1910 ? 

1920 ’ PAT 8 
1930 し* = し 

1940 IF INT <RND ⑴ *2>=0 THEN GOSUB 1440 : RETURN 
1950 GOSUB 1580 
1960 RETURN 
1970 » 

1980 □ 卜 iV エラヒ^* 

1990 FOR 1=1 TO し EN (し*) 

2000 N=ASC<MID$ 〈し I,1>> 一 65 
2010 IF N*-65 THEN 2210 

2020 IF N>=5 THEN GYS <LN> =GY ♦(し N>+•• "+JS (N-5) s GOTO 2210 

2030 ON N+1 GOTO 2050,2050,2080,2150,2050 

2040 » ソノヲ 

2050 GOSUB 2240 

2060 60TD 2210 

2070 * サイ 3 ウシ 

2080 GOSUB 2240 

2090 IF I=LEN(ll$> THEN 2210 

2100 HS=MID* 《し 1 + 1,1> !»<♦=■ •イ" 

2110 IF (HS="B")+(H$s"C M ) THEN K*="9" 

2120 GY 拿（し N>= し EFT*<GY$< し N>, し EN(GY ♦(し N> >_1)+K» 

2130 GOTO 2210 

2140 51 ケイ 3 ウドウシ 

2150 GOSUB 2240 

2160 IF I 二し EN (し THEN 2210 

2170 H»=MID<(L$,1 + 1,1)sK*= M ^ H 

2180 IF <H 拿 ="B"> + <H$="C"> THEN •二" 

2190 IF H»="A" THEN K %= ,, T n 

2200 GY ♦《し N> = し EFT* <GY*(LN>, し EN(GY* (し N> >-2)+K« 

2210 NEXT I 
2220 RETURN 
2230 * 

2240 T=INT(RND<1> JMMX <N>+1> > 

2250 GY$ (し N>=GY* (し n +TA*(N,T) 

2260 RETURN 
2270 11 

2280 DATA 力'*， A, デ，ノヨウデ，ノ 3 ウニ,ノ，ラ， 3 
2290 11 

10000 DATA T ミ，！、ア,ソラ，*シ，3アラ， t トミ，カコ，: TW ，フメ，加*ヤ字，; U ヲ Jt，n/7T ，ショウネン，レそン，オ f イテ* 
10010 DATA シ3ウシ'* 3,ユウ t, A" ノコイ, 1 ソ字, t •"ラーフク》拿 

10020 DATA : T ク，ワラウ，卜宇メク，ススム,フ，テイル，モエル,メサ~ メル，ネムル,加- 1*9, オ t ウ，《レラ,トフ 1 *, t 乎サク，ア TT レル 
10030 DATA 7ソア，ス中'*サ*»ヲ,デ宁シメル，ワムレル,テラシテイル, •：/■» テイル,拿 

10040 DATA ムアシイ，ウツクシイ, f サシイ，クルシイ，サヒ - シイ，カア1;イ，ヲカイ,シ□イ,マフ'*シイ,•ソメライ，イトシイ,ウルワシイ 
10050 DATA iVT シイ， rr マシイ，7オイ，クライ，]イシイ，アイライ, 771ルイ•ワカイ，* 

10060 DATA W カデ,シ 3 -ルデ，辛レイデ, r* ンソウテ乎デ，7ワレ—,ホノカデ,ス守デ, W ,ミリ3ヮテ中デ 
10070 DATA ワカ'* 77デ, 5ワクテ宁ヲ、フシ 5 T* デ，オデヤカデ，：?•，カデ,チ，ホ•ケラ•，拿 

10080 DATA i/hi/h, ”ラマ，ス，カリ,コウコウト，ド t ド千,ワクワワ,ユワリ，オオイニ, 7,ラク, f ウ，ステ*二,卜中二八，イ，•爪、 
10090 DATA モク¢7卜, 7,ラワト,本 

XI turbo, NEW BASIC の場合の変更点 
2188 H$*HIM(L$,Ui,l)!Kla*t» , 

2110 IF )♦<«!■•€•) THEN K •雪•ぐ 

2120 QVKLN)-LEFT.(6V$(LN),LEN(6V$(LN))-2)*K$ 

2170 H$*mM(Lf，IH，i〉：KM •だ* 

2180 IF (HI« , B , )*(HI* , C , ) THEN KM ■に • 

2190 IF HI-'A* THEN !<$=_々• 

2280 DATA が，は，だ，のようだ，のように，の，を，よ 

10800 DATA 波，花，空，星，夜空，讀，過去，淚，雨,»き，®，班河,少年，レモン,思い出,少女 
10010 DATA 夕明，I茂®，月，セーラー服,拿 

10828 DATA 泣ぐ笑う•と g めぐ遒も',»っている，炫える•目覚める，眠る，鑼ぐ想う 
10038 DATA 枯れた•飛ぶ，引#製く，流れる，遊ぶ，遇ぎ去った•抱#繍める，戯れる 
10848 DATA 照している，知っている，寨 

10050 MTA 虚しい，実しい，優しい，苦しい，淋しい，哀しい，离い，白い，まぶしい 
18060 DATA 冷たい，靉しい，醞しい，激しい，描ましい，蒼い， B8 い，恋しい，逢いたい 

10070 DATA 明るい，若い,拿 

18080 DATA 静かだ,シュールだ,奇麗だ,幻想^ゴ，哀れだ，ほのかだ，好#だ，平和だ 
10090 DATA Ifcb 的だ,わがままだ,•，不思議だ,播やかだ，真っ赤だ,ちっぼけだ,拿 
10100 DATA しとしと，たまたま，すっかり，こうこうと，ドキドキ，ワクワク，ゆっくり 
10110 DATA 大いに，全く，もう， K に，時には，いつかは， IK 々と，まったりと，寒 

XI, NEW BASIC の場合の変更点 
1310 CLS4sC0 し OR 5 

1320 0PEN"0 M ,#1, __GR: ":FOR 1=0 TO11 

1330 PRINT #1,RIGHT* (STR*(I + 1),2) 5 *•. •• j 6Y$ (I > s NEXTs CLOSE 

1340 CO し 0R7s し 6CATE0,24s INPUT" Printer ニシ n •ソリョク? (Y or N) " , K* 

1350 IF (K*="Y") + (K*="y"> + ) ELSE C し S4sG0T0 65535 

1360 N=0:C し S: し OCATE0,24s INPUT" : T：/ 宇-ョ〇 メ ? tr - レフ'*, Onl y CRETD M , N 

1370 IF (N<0)+(N>12) THEN C し S:GOTO 1340 

1390 0PEN"0",#1, ••し P: "sFOR 1 = 10 TO II 

1400 PRINT #1,GY$(I) 

1410 NEXTsCLOSEsCLSsGOTO 1340 
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わ一い！またやってまいりました“ M 
Z-1500 の周辺アプリを考える会”。先月号 
では我等が会のボス，幸氏が MCR の接続に 
挑戦しましたが，まあなんと， MCR の値段 
の高いこと。嘴によると MCR を買われた幸 


した（すごい出費だ一)。また，読者の方よ 
り「先月号に続いてそんな高価な周辺機器 
を買いやがって，俺を殺すつもりか！」と 
いうお叱りの言葉が聞えてくるような気が 
します力 ? ，そこはなんとか MZ-1500 のため 


氏は1力月間，雲や霞を食べて生活したと 
か（そんなアホな！）。 

冗談はさておき，実際のところマークカ 
ードのコーディングには大変苦労されたと 
思います（御苦労さん）。そこで今回，私は 
MCR に対抗できるのは何かと考えたあげく， 
バーコードリーダ（以下 BCR と略）に取り 
組んでみる事にしました。バーコードは， 
最近ではかなりポピュラーになってきてお 
りまして，お菓子の箱や缶ジュースの缶等 
に印刷されている縞模様のかたまりの事で 
す。このバーコードをライトペンのような 
もの（ライトペンではない）や，ドライヤ 
一のような形をしたバーコードスキャナー 
と呼ばれる入力装置で読み取り，その品物 
が1可であるかを認識し，ホストとなるコン 
ピュータ等に知らせるのです。だいたい私 
たちがよく見かけるタバコやお菓子の箱に 
付いているバーコードは JAN (Japan Artie 
le Numbering) と呼ばれるコード体系のも 
のがよく使われているようです。 

さて， BCR を MZ-1500 に接続する事が決 
まったところで，どこかに適当な BCR がな 
いかと日本全国を捜し回りました（ナント 
大袈裟な！）。 BCR を捜し求めて3千里。 

なにしろ MZ の周辺機器の中には BCR はな 
いのですから。いろいろと捜したところ， 

ようやく㈱メカノシステムズという会社よ 
り Spotron TM の BCR，MS-BarDecllO (16 
万9千円）が発売されているという事が判 
明。早速，清水の舞台から飛び降りたつも 
りで大枚，16万9千円をはたいて購入しま 


と思ってグッとこらえてください。実際の 
ところ会のメンバ、一からは，毎日，白い目 
で見られているのですから。 

この BCR は， RS-232C で接続でき，出力 
コネクタも D-25S (25 ピン D サブコネクタ） 
ですので MZ-1500 との接続にも相性が良く， 
また，読み取り可能なバーコードも6種類 
あり，なかなか高性能です。 

|さあ接鋳だ！ 

BCR が入手できたので，さっそく MZ-15 
〇〇との接続に取りかかりましょう。今回の 
バーコードシステムに 必要なものは以下の 
とおりです。 

• MZ-1500& デイスプレイ（当然デスネ） 

• BCR (MS-BarDecllO) 

• MZ-1E24 (低価格 RS-232C インタフエ 

イス） 

• MZ-8BC03 (RS-232C ケーブル) 

• MZ-1P17 (高機能•ハイコストパフオー 
マンスサーマル 漢字プリンタ） 
MZ-1P17 に関しては， バーコー ドプリン 

夕として使用しますので専用バーコードプ 
リンタがあれば特に必要ありません。しか 
し，既に BCR で16万9千円もの投資を行っ 
ており，私のサイフの中はもうスッカラカ 


ン。 したがって，これ以上の出費は取りも 
直さず身の破滅を招くことになりかねない 
ので，ここは ひとつソフ トの力で MZ-1P17 
をみごと バーコー ドプリ ンターに 変身させ 
ることにしましよう。 

さて，以上のものが用意できたら，それ 
ぞれの設定に取りかかりましよう。まず， 
MZ-1E24 からです。 MZ-1E24 の設定は以 
下のようにします。 

• 使用チヤンネル= A チヤンネル 
• 結線モード =BI モード 
• 端子モード=ターミナルモード 
• ボーレート =9600 ボー 
•ポートアドレス = BOh 〜 B3 h (工場出 
荷時設定） 

• JB-M=OFF 

以上の設定を，説明書を見ながら確実に行 


接続図 




MZ - I 500 バーコードリーダ応用術 175 





























ってください0ただし，チヤンネルとボー 
レートは好みのものを使用しても構いませ 
ん。次に BCR 本体の設定です。こいつは， 

とりあえず以下のように設定します。 

•終了コード =CR ( ODH ) 

• データビット= 8ビット 
• パリテイチェック =DISABLE 
•ストップビット= 2ビット 
• ボーレート=9600ボー 

• バーコード = j AN 

• オン/オフライン=オンライン 
「とりあえず」と書いたのは，これらの設 
定は MZ -1500 本体の RS -232 C の設定と合わ 
せてやる必要があるからです。また ， JAN 
コードに設定したのは，先程も書きました 
が，私たちの身の回りで JAN コードが比較 
的簡単に見つけることができるからです。 

|さあ動かしてみよ5ぜ！ 

これで各ハードウェアの設定は完了しま 
した。この初期設定というやつが曲者でし 
て，ひとつでも違っていると当然のこ.とで 
すがウンともスンともいわないのです。や 
っかいではあります力、またこれが何とも 
言えぬ快感でもあり，ひとつの設定が終わ 
るごとに私のワクワク ボルテージは 上がつ 
ていくのです。ちょっと横道にそれてしま 
いましたネ。さて，おもむろに MZ -1500 の 
内部スロットに MZ -1 E 24 を差し込み，ケ 
ーブルを BCR に接続します。はやる心を静 
めながら電源 ON ! 侍て侍て，慌てるでな 
い。電源を ON にはしてみたものの，動か 
すソフトがないではないか。「パソコンも， 
ソフトがなければただの箱 j ということは 
賢明な MZ フアンの方々なら100年も前か 
ら知っておられるでしょう。ということで 
何か手短なソフトを用意しましょう。 

大好きな BASIC を起動し，リスト1を入 
力し， F 1 キー （ RUN ) を押して実行して 
ください。実行と同時にバーコードの受信 

42001> BCR テストプログラム 


10 REM 拿拿拿拿 t* 拿窜拿难 t 拿 »« 拿拿拿 • 拿拿拿拿拿 t ** 拿韋拿拿拿拿 

20 REM 拿 

30 REM« PROGRAM 1 
40 REM 拿 

50 REM* BCR TEST 
60 REMt 

70 REM 窜拿拿拿拿 « 拿 * 拿拿拿 t* 拿拿拿拿拿拿拿拿拿 》 拿拿拿 * t 拿拿 

80 INIT l, RSil*00,«BC M 
90 ROPENW1, M RSHR6232C N 
100 INPUT#1,H#«PRINT Mt 
110 CLOSE 
120 GOTO 90 


BCR 活用プログラム 


10 REM 拿 t 拿拿拿拿拿拿拿 t 拿拿拿拿拿拿拿拿拿拿拿 »* 拿拿拿 tt 拿拿拿 * t 

20 REMIt t 

30 REMt t 

40 REMt PROGRAM2 t 

50 REMt t 

60 REM 拿 BAR CODE AP し ICATION t 

70 REM 拿 拿 

BO REMt 拿 

90 REM 拿拿拿拿 t 窜拿聿拿拿拿拿拿拿拿拿拿拿拿拿拿拿拿拿拿拿 t 拿拿拿 * 

100 DIM M*( 100 ) , DA»( 30 ) , DN»(10),DK<<20) 

110 ON ERROR GOTO "ERROR" 

120 RESTORE 1680s FOR 1=0 TO 9s READ DN*(I)：NEXT I 
130 RESTORE 1690* FOR 1-1 TO 26iREAD DA*(I)tNEXT I 
140 RESTORE 1720*FOR 1=0 TO15iREAD DK*(I)sNEXT I 
150 RESTORE 1730*READ DK«(20) 

160 LABEL "MAIN"*PRINT "B" 

170 CURSOR 10, 5 ： PRINT "MUSIC PLA、 f - 1•• 

180 CURSOR 10,7: PRINT "MUSIC SAVE - 2 H 

190 CURSOR 10,9：PRINT "BAR CODE PRINT - 3" 

200 CURSOR 10,llxPRINT "BAR CODE READ - 4" 

210 CURSOR 10,13i INPUT •• PUSH KEY <+CR) M ； A* 

220 IF At-"l"THEN M MP し AY" 

230 IF At»"2" THEN "MSAVE" 

240 IF A*-"3 H THEN "BCPRINT" 

250 IF THEN "BCREAD** ELSE 210 

260 REM 

270 REM - MUSIC PLAYING - 

280 REM 

290 し ABE し "MPLAY M 
300 GOSUB "MENU" 

310 IF DL<-1 THEN "MAIN" 

320 FOR ID-1 TO D し 一 lsMUSIC M*(ID)：NEXT ID 

330 PRINT "B":CURSOR 10,11:PRINT "MUSIC END"：WAIT 100 0:GOTO “MAIN" 

340 REM 

350 REM - MUSIC DATA SAVE TO QD - 

360 REM 

370 し ABE し "MSAVE__ 

380 GOSUB “MENU" 

390 IF D し** 0 THEN "MAIN" 

400 PRINT "H* 4 * CURSOR 10,7s INPUT "SAVE DATA FILE NAME- M jF 擊 
410 WOPEN #1,"QDJ ,, *F* 

420 FOR ID«1 TO DL«PRINT «1,Mt(ID)xNEXT ID 
430 CLOSE 

440 PRINT ..B •.丨 CURSOR 10,11 SPRINT "MUSIC DATA SAVE COMP し ETED" •• WAIT lOOOsBOTO "MAI 
N M 

450 REM 

460 REM - BAR CODE PRINTING - 

470 REM 

480 し ABEL "BCPRINT" 

490 GOSUB "MENU" 

500 IF DL-0 THEN "MAIN" 

510 FOR ID-1 TO DL 

520 REM - CONVERT # TO %- 

330 > 

540 FOR JD«1 TO ML 

550 JD,1) 

560 IF MK*--# 1 ' THEN 
570 MO*-MOt+MK* 

380 NEXT JD 

390 MM*«MO*sGOSUB "BARPRNT" 

600 NEXT ID 

610 PRINT ••H*' * CURSOR 10,11：PRINT "BAR CODE PRINT COMPLETED ••: GOTO "MAIN" 

620 REM 

630 REM - BAR CODE READ - 

640 REM 

650 し ABE し "BCREAD" 

660 PRINT M H M : CURSOR 10,1 1 SPRINT ..RECEIVING BAR CODE M 

670 INIT'*RS 1« tOO, *8C M iREM - RS-232C INITIALIZE - 

680 ROPEN* 1,"RSI* RS232C•• 

690 FOR ID-1 TO 100 

700 INPUT#i,M^<ID> し*•し EN<M*<ID> > 

710 FOR JD-1 TO ML 

720 MK*»MID*(M*(ID),JD,1) 

730 IF MK*--%" THEN 
740 MOt»MO*+MK 拿 
750 NEXT JD 
760 M*(ID)»MO* 

770 CURSOR 10,131 FOR IS=1 TO 39*PRINT CHR«(*20>；iNEXT IS：CURSOR 10,13：PRINT H 參 <1 
D> 

780 IF M*(ID)- H END M THEN 800 
790 NEXT ID 

800 DL»IDiCLOSExSOTO "MAIN" 

810 REM 

820 し ABE し "MENU" 

830 PRINT “B" 

840 CURSOR 10,51 PRINT "DATA ALREADY EXIST ― 1" 

850 CURSOR 10,71 PRINT "DATA LOAD FROM QD - 2" 

860 CURSOR 10,9:PRINT "DATA MANUAL INPUT - 3" 

870 CURSOR 10,11* INPUT - PUSH KEY (+CR) ;A 嘛 

880 IF THEN RETURN 

890 IF A*-"2 M THEN 910 

900 IF A*_"3" THEN 930 ELES BOO 

910 PRINT " 8 " sCURSOR 10,7：INPUT "LOAD DATA FILE NAME- H ； F* 

920 GOSUB ,, FREAD ,, s RETURN 
930 ID=1*PRINT "B" 

940 PRINT IDJ" OLD DATA*"JM*<ID> 

950 INPUT - NEM DATA« M ?M*<ID) 

960 IF H*(ID)» H END H THEN 980 
970 ID»ID^H60T0 940 
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待ちとなりますから，適当にバーコードを 
見つけてきて（とは言っても JAN コードの 
ものてないと困りますが），ノぞーコードスキ 
ャナーを持ってバーコードの上をこすって 
みてくた•さい。「やった！」ピッ！という 
音とともに CRT 画面上に受信データが出力 
されたでしよう。 GOTO 文でループになっ 
ていますので何度でもリトライ可能です。 
まあしばらくはお菓子の箱でも持ってきて 
遊んでみてください。 

|いよいよ本番だ./真打登場 

これで BCR は動くようになりました。で 
もこれで「めでたし，めでたし」とペンを 
置いたのでは， MZ - 1500の周辺アプリを考 
える会々員としては，由々しき問題であり， 
悪くすれば会を破門になる可能性も十分に 
あると考え，次のようなアプリケーション 
を作ることにしました。 
l . MZ -1 P 17 をバーコードプリンタとして 
使ぅ。 

2 •音楽データをバーコードで入力する。 

3.音楽データをバーコードでプリントアウ 
卜する。 

以上のコンセプトの順に進んでいくことに 
します。 

MZ 1500 BASIC の音楽データには，アル 
ファベットが必要となりますのでバーコード 
は CODE - 39を使用します。先程まではずっ 
と JAN のコードでやってきましたので ， B 
CR のコード設定を CODE -39 に変更してく 
ださい。また，“#”記号がシャープとして必 
要ですが CODE -39 にはありませんので，そ 
の代わりに“％”のバーコードを使用します。 
ですからプログラム中でコード 
の変換が必要です。 

少し前おきが長くなりましたが，リスト 
2をこつこつ入力していってください。入 
力が終わったらトラブルが起こる前に QD 
にセーブしておきましよう。このプログラ 
ムも最初はもっと短かったのですが，作 
っている最中に，私の回りにいる人間たち 
(当然，うちの会員連中です）力 ? ，「ここは 
こうした方がええで j と力、，「こんな機能も 
あった方がええんとちやうか（良いのでは 
ないか)」と完全な大阪弁でちよっかいを出 
してくるのです。そう言われるとギャラリ 
一受けを狙らう私といたしましては，希望 
に沿うように努力する次第でございまして， 


980 D し =ID:RETURN 
990 し ABE し "FREAD" 

looo ropen an , m qds m +f* 

1010 FOR ID=1 TO 100 
1020 INPUT#1,M*(ID) 

1030 IF M<(ID)®"END M THEN 1050 

1040 NEXT ID 

1050 C し OSEsD し 》IDsRETURN 

1060 REM 

1070 REMt 拿拿拿拿拿拿拿拿本拿拿拿拿拿拿拿拿 t 
1080 REM 拿 拿 

1090 REM 拿 BAR CODE PRINT BY MZ-1P17 拿 
1100 REM 拿 MMt — DATA * 

1110 REM 拿 拿 

1120 REM 拿拿拿拿拿拿拿拿寒拿拿拿 * 拿拿拿韋拿拿拿 t 拿車拿拿拿拿 

1130 LABEL ,, BARPRNT M 
1140 REM 

1150 INIT"LPTsS5,»0D"*REM - PRINTER INITIALIZE - 

1160 PRINT/P CHR*(*A) ： PRINT/PsPRINT/PsPRINT/P CHR*(*1B)| ； CHR*(14 )； 

1170 REM 

1180 FOR IP=1 TO 3 
1190 REM 

1200 REh - START CHARACTER <*> PRINT - 

1210 REM 

1220 BA$=DK» ( 20) ： G05UB ,, BPRINT , * 

1230 REM 

1240 REM - DATA CHARACTER PRINT - 

1250 REM 

1260 M し =1_EN<MM*>SREM - ML-DATA LENGTH - 

1270 FOR 11*1 TO M し 

1280 ST*=MID*(MM*,II,1>sS1=ASC<ST*>sBA»=DA 拿 （ 24> 

1290 IF SI >=¢20 AND S1<=*2F THEN BA*=DK*(Sl-*20) 

1300 IF SI >=*30 AND Sl<=$39 THEN BA*=DN*<Sl-*30) 

1310 IF Sl>=*41 AND S1<=*5A THEN BAS«DAS(Sl-*40) 

1320 GOSUB "BPRINT" 

1340 NEXT II 
1350 REM 

1360 REM - STOP CHARACTER <*> PRINT - 

1370 REM 

1380 BA$«DK*( 20 )： GOSUB "BPRINT__ 

1390 PRINT/P 
1400 NEXT IP 
1410 PRINT/P CHR*(*A)$ 

1420 RETURN 
1430 REM 

1440 REM - PRINT SUBROUTINE - 

1450 REM 

1460 し ABE し "BPRINT" 

1470 PRINT/P CHR*<*1B>i"%l"JCHR*(0,36)i 
1480 FOR 1=1 TO 9 
1490 B1*=MID*(BA*,I,1) 

1500 IF Bl*="O n THEN PRI NT/P '* ； 

1510 IF THEN PRI NT/P "iriflflflflflflflflflflflflfiriflfir ； 

1520 IF Bl*="2" THEN PRINT/P CHR»(0,0,0,0,0,0,0,0,0 )； 

1530 IF Bl*= ,, 3" THEN PRINT/P CHR* <0, 0,0,0,0, 0,0,0,0,0,0, 0,0,0,0,0,0, 0 )； 

1540 NEXT I 
1550 REM 

1560 REM - CHARACTER SPACE PRINT - 

1570 REM 

1580 PRI NT/P CHR*(«1B) ； ,I 7.1 ,I ； CHR*(0 ( 6) ； CHR* (0, 0, 0, 0,0, 0, 0, 0, 0, O f 0, 0» 0, 0, 0» 0» Of 0 > I 
1590 RETURN 
1600 END 
1610 REM 

1620 REM CODE-39 BAR CODE DATA 
1630 REM 0—NARROW BAR 

1640 REM 1 —— WIDE BAR 

1450 REM 2—NARROW SPACE 

1660 REM 3--WIDE SPACE 

1670 REM 

1680 DATA _• 0203 121201 2030202 1, M 021 30202 1"121 30202 0" 02031 2021120312020 
02131202 0", '*020302121", M 12030212 0", '* 02130212 0" 

1690 DATA "1 2020302 1", ,, 021 20302 1121 20302 0 " 02021 3021 M ,"12021 3020"，-021213020 
», ,, 020203121 M , H 12020312 0", M 02120312 0 M , " 02021312 0" 

1700 DATA "1 2020203 1021 20203 1121 20203 0 02021 2031", M 12021 2030 ", n 021212030 

", M 02020213 1"," 12020213 0"," 02120213 0"," 020212130" 

1710 DATA "1 3020202 1","031 20202 1", "131202020 "," 03021 2021","13021 2020•.,"031212020 

1720 DATA ,, 021202 120", "DM","DM","DM"," 03030302 0"," 020303030 ","DM","DM","DM","DM" 
, 0302 12120", " 03020303 0 % _• DM 030202 1211 30202120", H 0303020 30，• 

1730 DATA "030212120" 

1740 END 

1750 し ABE し "ERROR" 

1760 PRINT "B"s CURSOR 10,5 

1770 IF ER し =320 THEN PRINT "ERROR !!! —— I しし EGA し MUSIC DATA" 

1780 IF ER し >380 AND ER しく 440 THEN PRINT "ERROR !!! —— MUSIC DATA SAVE" 

1790 WAIT 1000 
1800 RESUME 160 


とうとうこのようなプログラムになってし 
まいました.。 

また，自分が個人として使うのであれば， 
このように REM 文を入れることもないので 
すが，いざ人様に見ていただくとなると， 
とたんに様子が変わってしまい，少しでも 
カツコ良く，また少しでも理解しやすくと， 


ない知恵をふり絞って考えましたが，やは 
りプログラムの中身を見られるというのは 
何か自分の通知票でも見られているようで， 
気恥ずかしいものです。 

話がかなりプログラムの本題とかけは離 
れてしまいました。ここらあたりで再び軌 
道修正とまいりましよう。こつこつと入力 
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したリスト 2 を，とにかく実行させてみま 
しよう。メインメニューが CRT 画面にこの 


ように表示されます。 

MUSIC PLAY . 1 

MUSIC SAVE .2 

BAR CODE PRINT …… 3 
BAR CODE READ …… 4 


PUSH KEY ( + CR ) 

と表示されます。 1 は音楽の演奏，2は音 
楽 データの QD への 登録，3は音楽 データを 
バーコードで プリント， 4 は バーコードで 
プリントされた音楽 データを 読み込めるよ 
うになっています。さらに 1.2*3 のうち 
いずれかを選択すると，サブメニューが C 
RT 画面上に表示されます。 

DATA ALREADY EXIST …1 


DATA LOAD FROM QD •••". 2 
DATA MANUAL INPUT •••••• 3 


PUSH KEY ( + CR ) 
ここで， 1 はすでにデータが MZ -1 500内に 
ある場合に，キーボードより入力します。 
ですからこのプログラムを実行し，メイン 
メニューで1か2か3を選んだ直後に，サ 
ブメニューで1を入力すると，まだ MZ -15 
00内に音楽データが無いために，メインメ 
ニューに戻ってしまいます。2は音楽デー 
夕を QD からロードする場合に使用します。 

六甲おろし（バーコードリーダで読めます） 


当然のことながらこの場合には QD 内に音 
楽データが B S D ファイルで登録されている 
ことが必要です。またこのデータの最後は， 
“ END ” という文字データであることが必 
要です。データのロードに際しては，ファ 
イルネームが聞かれますので正しく入力し 
てください。 

最後に3ですが，これはキーボードより 
マニュアルで 音楽 データを 入力する場合に 
使います。3を入力すると，画面には， 
DATA = 

と表示されますので， BASIC に従って音楽 
データを 入力し ， CR キーを 入力してくださ 
い。ただし，この場合の注意として， 

1 ) CR キーを入力するまでのひとつのデ 
ータの長さは，1〜30キャラクタまでと 
します （ BCR の読み取り能力の関係上)。 
また，31キャラクタ以上になるときは， 
データをいくつかの部分に分割して入力 
してください。 

2) 最後のデータは， 

DATA = END H ( CR ) 

で終わるようにしてください。このデー 
夕の入力によってメインルーチンへ戻る 
ことができます。 

さて，バーコードのプリントですが，こ 
れは， MZ -1 P 17 のビットイメージコマンド 


を使用します。 BCR の読み取り精度を上げ 
るため，バーコードにはある程度の濃さが 
必要となってきますので，同じデータを続 
けて3回印字します。ただし先にプリント 
されたデータとうまく重なるように改行量 
は調節してあります。 CODE -39 の各キャラ 

クタのワイド エレメント （ワイド バー およ 
びワイド スペース） には， ビット イメージ 
で6カラム分を，また ナローエレメント （ナ 
ローバー および ナロ ー スペース） には， 3 
カラム分を使用します。読み取り精度を上 
げるためには，インクリボンを使用するよ 
りも感熱紙を使用した方が ベター だと思い 
ます。以上が今回の BCR プログラムの簡単 
な説明です。 

プログラムは BASIC しか使用していない 
(マシン 語なんてもっての他）ので，特に 
難解という事はないと思います。 エラー 処 


六甲おろし 


10 DATA 

••T7V15M8S0" 

20 DATA 

..G7E5G5+C3+C5+C3G7 M 

30 DATA 

"A5B3+C3+D5+C3A38BR5" 

40 DATA 

"G7A5B5+C6+D3+E7 •• 

50 DATA 

"+D5+C5B5A3G3+C8R5" 

60 DATA 

M +D6+D3+D5G5+C5+E5+G7" 

70 DATA 

"+E5+B5+F3+E3+D3+C3+D8R5" 

80 DATA 

"+G6+G3+E5+C3B3A5B5+C5+D5" 

90 DATA 

,, +E8+D5+C8R5" 

100 DATA 

"Q7+C7+C5+E8" 

110 DATA 

•_ +G7+G7+G3+G7R6" 

120 DATA 

"+E7+D5+D5+C8R5" 

130 DATA 

"END" 


圓訓 _111111_關11111_|關111111 
11111111111111111111111111111111^ 

1»11«11_圆1關1111__1111111_ 

11111111111111111111111111111111^ 

11111111111111111111111111111111^ 
ill 謂關 iimiiiiii 圆 
11111111111111II!11111111111111111111111^ 
11111111111111111111111111111111111111111111111 ^ 
1111111111111111111111111111111 IIIN 
N1 關 HI 關 II 關 1111 訓 I 議剛 
H 削 III 關剛 11111 關議 III 關 mi 画 lh 剛 lim 訓 HIINIII 
11111111111111111111111111111111111111 ^ 

1111111111111111111111111 
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理ゃ入力方法，表示方法などまだまだエ 
夫できるところがあると思いますが，それ 
らは賢明なる読者諸兄に委ねることにしま 
す。サンプル音楽として今シーズン日本一 
になりました阪神タイ ガースの 「六甲おろ 
し」のデータを載せておきますので参考に 
してください。 

とりあえず BCR の変わった使い方のひと 
つを考えてみましたが，もっと他におもし 
ろい使い方もあると思います。たとえば， 
プログラムのリスト をバーコード化すると 
か，サークルやクラブ等で暗号を作ってお 
き， その バーコードを読まないと システム 
が起動しないとか，また，個人の Identity コ 
ードを決めるとかです。あとは，皆さんで 
考えてみてください。 

今回使用した BCR はいかがでしたでしよ 
うか。今日の技術進歩は目ざましいものが 
あり， BCR の使い方にも予想外のものが出 
てくるかもしれませんね。 

さて，この原稿を書いている間に，我等 
が会にひとつの荷物が届けられました。中 
を開けてみると何かロボツトらしきものが 
入っているじゃありませんか。いずれこ 
の誌面にも登場するのではないかと楽しみ 
にしています。では，再び私とこの誌面で 
お会いする日まで，さらばじゃ。とあいさ 
つをひととおりすませたあとで，ナント， 
バーコードの基本的解説が続くんですね。 


これが，しつこいなんて言わないで，きっ 
と役に立つから読んでみてください。 

备種バーコードの構成 

これから各種バーコードの構成について 
簡単に説明します。なお，これらの内容に 
ついては今回使用しました MS-Bar Decll 
0の取扱説明書を参考にしています。 

1 . バーコードの構成 
ほとんどのバーコードは図2のような構 
成になっています。 

① スタート/ストップキャラクタ 
これらのキャラクタは，それぞれバ'ーコー 

ドシンボルの始まりと終わりを示すもので， 
スキャナに情報の入力方向やバーコードの 
種類を示します。バーコードはどちらの方 
向からもスキャニングできるようになって 
います。 

② マージン（空白ゾーン） 

スタート/ストップキャラクタに隣接す 

る何も印刷しない空白域です。このマージ 
ンと， バーとスペース による 一定のパター 
ンで，スキャナはそれが正しいコードであ 
るかどうかを判断します。このマージンの 
幅はコード体系により規格が定められてお 
り，読み取り機によって若干の差はあります 
が,通常細い バーの 横幅か，狭い方の スペー 
スの 幅の10倍以上は必要となります。この 
マージン幅が狭すぎると，スキヤナはコー 







•:ワイド=1: 2.5-3. 5 
« N W -7 の例 


NW 7コードのパターン構成表 


マージン スタート•ストップキャラクタ 


データキャラクタ 


I 1门1 


111 1111111 


ヒューマンリーダブルエリア 


ドの確認ができません。 

③ヒューマンリーダブルエリア 

ここに人間の判読可能な情報が文字で印 
刷されます。 

2. コードの種類と特徴 

① NW - 7 

NW -7 は各キャラクタが7ビットのエ 
レメント （7 本のパターン）で表わされ， 

4本のバー（黒い部分）とその間の3本の 
スペースで構成されます。そのうちの2本， 
または3本はワイド エレメントで， 他はナ 
口ー エレメントです。 また各キャラクタ間 
のスペースは，キャラクタギャップと呼び， 
ワイドスペースと同じ幅になっています。 
NW -7 で表現できるキャラクタは，“0〜9” 
までの数字と6種類の特殊文字（一$ : 

+ )，スタート/ストップコード （a b c d ) 
の計20種類です。 

•スタート/ストップコード 
スタート/ストップコード （ a 〜 b ) は，デ 
ータ列の最初と最後に必ず1文字ずつ付け 
る必要があります。また，その組み合わせは 
自由に使えるので，同じ“1234” というデー 
夕に対しても，スタート/ストップコードの 


CHARACTER 

BARCORD PATTERN 

CHARACTER 

BARCORD PATTERN 

Bl 

si 

B2 

S2 

B3 

S3 

B4 


Bl 

si 

B2 

S2 

B3 

S3 

B4 


0 

0 

0 

0 

0 

0 

1 

1 


- 

0 

0 

0 

1 

1 

0 

0 


1 

0 

0 

0 

0 

1 

1 

0 


$ 

0 

0 

1 

1 

0 

0 

0 


2 

0 

0 

0 

1 

0 

0 

1 



1 

0 

1 

0 

1 

0 

0 
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1 

0 

0 

0 

0 

0 



1 

0 

1 

0 

0 

0 
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4 

0 

0 

1 

0 

0 

1 
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1 
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5 

1 

0 

0 

0 

0 

1 

0 


+ 

0 

0 

1 

0 

1 

0 

1 
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0 

1 

0 

0 

0 

0 

1 


a 

0 

0 

1 

1 

0 

1 

0 


7 

0 

1 

0 

0 

1 

0 

0 


b 

0 

1 

0 

1 

0 

0 

1 
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0 

1 

1 

0 

0 

0 

0 


c 

0 

0 

0 

1 

0 

1 

1 


9 

1 

0 

0 

1 

0 

0 

0 


d 

0 

0 

0 

1 

1 

1 

0 



感 ! ISl fc NW 7 HEX コードのパターン構成表 


上の表で1はワイドエレメントで0はナローエレメントです。ここで，表を參照し 
てデータ " a ” に関するエンコード（パターン作成）したものを示します。 


CHARACTER 

BARCORD PATTERN 

CHARACTER 

BARCORD PATTERN 

Bl 

si 

B2 

S2 

B3 

S3 

B4 


Bl 

si 

B2 

S2 

B3 

S3 

B4 


0 

0 

0 

0 

0 

0 

1 

1 


A 

0 

0 

0 

1 

1 

0 

0 


1 

0 

0 

0 

0 

1 

1 

0 
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0 

0 

1 

1 

0 

0 

0 


2 

0 

0 

0 

1 

0 • 

0 

1 


C 

1 

0 

1 

0 

1 

0 

0 
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1 

1 

0 

0 

0 

0 

0 
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1 

0 

1 

0 

0 

0 

1 


4 

0 

0 

1 

0 

0 

1 

0 


E 

1 

0 

0 

0 

1 

0 

1 


5 

1 

0 

0 

0 

0 

1 

0 


F 

0 

0 

1 

0 

1 

0 

1 


6 

0 

1 

0 

0 

0 

0 

1 


a 

0 

0 

1 

1 

0 

1 

0 


7 

0 

1 

0 

0 

1 

0 

0 


b 

0 

1 

0 

1 

0 

0 

1 


8 

0 

1 

1 

0 

0 

0 

0 


c 

0 

0 

0 

1 

0 

1 

1 


9 

1 

0 

0 

1 

0 

0 

0 


d 

0 

0 

0 

1 

1 

1 

0 
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組み合わせを替えることで16種のデータに 
分けることができます。 

② NW -7 HEX 

NW -7 HEX は，バーコード構成および， 

その他の仕様は， NW -7 と同じです。ただ， 

異なっている部分は NW -7 における6種類の 
特殊文字を英文字の A 〜 F に置き換えたこ 
とです。このことにより NW -7 HEX コード 
は，英大文字を持っているため，16進数の 
文字として扱えますので，パソコン等への 
データやプログラム入力，漢字コードの入 
力等に使用できます。 

③ CODE -39 

CODE -39 は各キャラクタが9ビットのエ 
レメント （5 本のバーと4本のスぺース） 

で構成されます0 9ビットのエレメントの 

うちの3本はワイドエレメントで，6本が 

ロー—レ， v 卜 〆 すまた七七ニク々 （注） space はリーダーのデータ出力としては空白として出るので不読のデータではないことに注意して 

間のスペースは，ワイドスペースと同じ幅 



JAN 標準 



センターバー 


ライト 
ガードパー 


D 2 D 3 D 4 D 5 D 6 D 7 D 8 D 9 DIO Oil DI 2 M 


( D 1)、 


左側のデータキャラクタ 
(6 キヤラクタ） 

フラグキャラクタ 


右側のデータキャラクタ 
(5 キャラクタ） 


モジュラスチェック 
キャラクタ 


麵漏 JAN 短縮 


レフト 
ガードバー 


センターノマー 

1卜 


D 1 D 2 D 3 D 4 D 5 D 6 D 7 M 


ライト 
ガードバー 

(- 


左側のデータキャラクタ 右側のデータキャラクタ 
(4 キャラクタ） （3 キャラクタ） 


モンユフスナエツク 

キャラクタ 


フラグキャラクタによる左側データの構成 


フラグキャラクタ 

左側のデータキャラクタの組み合わせ 

F ( D 1) 

D 2 

D 3 

D 4 

D 5 

D 6 

D 7 

0 

0 

0 

0 

0 

0 

0 

1 

0 

0 

E 

0 

E 

E 

2 

0 

0 

E 

E 

0 

E 

4 

0 

E 

0 

0 

E 

E 

5 

0 

E 

E 

0 

0 

E 

6 

0 

E 

E 

E 

0 

0 

7 

0 

E 

0 

E 

0 

E 

8 

0 

E 

0 

E 

E 

0 

9 

0 

E 

E 

0 

E 

0 


本0は奇数パリティ 
E は偶数パリティ 
を示します。 


•SH j AN 槙進のエンコード例 


9一の奇数ハ•リテイデータ1。 |" i ~| 



3倍- 1 1倍 j 1倍*"2倍 


スペースパー スペースパ_ 


JAN ではキャラクタギヤツプはありません 


Pllllllllllffillllil 

411301234115678941 

※上図の例でフラグキヤ 
ラクタ（左側）が“ 4” 
なので1番目の左側デ 
一夕である “9" は奇 
数パリテイとなります。 


J AN のデータエンコード表 


10進数 

左側のデータキャラクタ 

右側のキャラクタ及び 

モジュラスチェックキャラクタ 


奇数パリティ 

偶数パリティ 

0 

0 0 

0 

1 

10 

1 

0 

10 

0 

1 

1 

1 


1 

1 

1 

0 

010 

1 

0 0 

1 

1 

0 0 

1 

0 

11 

0 

0 

1 

1 


1 

1 

0 

0 

110 

2 

0 0 

1 

0 

01 

1 

0 

01 

1 

0 

1 

1 


1 

1 

0 

1 

10 0 

3 

01 

0 

0 

01 

1 

0 

10 

0 

0 

0 

1 


1 

0 

0 

0 

010 

4 

01 

0 

0 

01 

1 

0 

01 

1 

1 

0 

1 


1 

0 

1 

1 

10 0 

5 

01 

1 

0 

0 0 

1 

0 

11 

1 

0 

0 

1 


1 

0 

0 

1 

110 

6 

01 

0 

1 

11 

1 

0 

0 0 

0 

1 

0 

1 


1 

0 

1 

0 

0 0 0 

7 

01 

1 

1 

01 

1 

0 

01 

0 

0 

0 

1 


1 

0 

0 

0 

10 0 

8 

01 

1 

0 

11 

1 

0 

0 0 

1 

0 

0 

1 


1 

0 

0 

1 

0 0 0 

9 

0 0 

0 

1 

01 

1 

0 

01 

0 

1 

1 

1 


1 

1 

1 

0 

10 0 

レフトガ- 

—ドバー及びライトカ‘ 

ー ド バー 






1 

0 

1 



センター. 

バー 












0 

1 

0 

1 

0 


上記の表で“1”はバーで "0” はスペースを表しています。図5に表5 
を参照して JAN 標準の左側データ "9” の奇数パリティについてエンコード 
(パターン作成）したものを示します。 
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になっています。 CODE -39 で表現できるキ 
ャラクタは36種類の英数文字 （0 〜9， A 〜 
Z ) と，7種類の記号文字（一，•，$， 
/，+，％， SPACE ) です。 

• スタート/ストップキャラクタ 
CODE - 39のスタートスタート/ストツフ。 
キャラクタはです。データ文字の最 
初と最後に必ず1文字つけてください。 

• チェックキャラクタ 
CODE - 39は，データの信頼性を高めるた 
めのチェックキャラクタが使用できます。 
このチェックキャラクタは，モジュラス43 
と呼ばれ次式より算出します。 

例） “ ABC ” のモジュラスチェックキャラ 
クタ。 

表3の tt A ”，“ B ”，“ C ” の各データの 
“数値”の欄にある10，11，12を加えて， 

その結果を43で割ったときのあまりの値が 
モジュラス チェック キャラクタの“数値”に 
なります。 

“ ABC ” MOD 43=(10 + 11 + 12) 
MOD 43=33 

したがってチェックキャラクタは“ X ” 
になります。その結果，チェックキャラク 
夕を付加したデータは “ ABCX ” となります。 


します。それでは，これからほんとうの最 
後のごあいさつです。また，次回の企画を 
楽しみにしていて〈ださい。さらばじや。 

く BCR 問い合わせ先〉 

販売代理店コロンビア貿易株式会社 


東京都千代田区猿楽町卜 2-1 


S 03(29 l )064 l ^ 

大阪市北区万才町 4- 12 

006(361)7802 


モジュラスチェックキャラクタの求め方 


まず図 4 - 1 におけるデータ D I 〜 D 12 を“ 4 9 0 I 2 3 4 5 6 7 8 9” に対応させます。 


F(D1) 

D2 

D3 

D4 

D5 

D6 

D7 

D8 

D9 

DI0 

Dll 

012 


9 


1 


3 


5 


7 


9 

4 


0 


2 


4 


6 


8 



I :まず，2番目のキャラクタ （ D 2) からはじめて，すべての偶数番キャラク 
夕（上段）の値の和を求めると 
D 2 + D 4 + D 4 + D 6+ D 8 + DI 0 + DI 2 = 9+ 1+3 + 5 + 7 + 9 = 34 
2:そして丨：で求められた値を3倍とすると 34 X 3102 となり，これを DE 
とおきます ( EVENDATA ) 

3 :次に丨番目のキャラクタ （ D 1) より，すべての奇数番キャラクタ（下段） 

の値の和を求めますと 

D 1 + D 3 + D 5 + D 7 + D 9 + DI 1 = 4 + 0 + 2 + 4 + 6+8=24 D 0( ODD ) DATA 

4 :さらに，2 : 3 :の結果の和を求めると DE + DO = I 02 + 24= I 26 

5 :最後に，4 :で求められた値より大きな10の倍数（この場合は130)との差 

を求めると，モジュラスチェックキャラクタが求められます。 

M = 130-126=4 

これが求められたモジュラスチェックキャラクタでサンプルでの最後のキャ 
ラクタ “4” に一致していることが確かめられます。 

短縮コードの場合は D 1から D 5 を0で埋め DO 〜 D 12に7桁を入れて算出し 
ます。 


④ JAN 

JAN には，データ数が13ある JAN 標準（図 
4-1) とデータ数が8の JAN 短縮（図 4-2) が 
あります。このコードの特長は，バー/スぺ 
ースの幅が4種類あることです。また，表 
现できるキャラクタは数字〇〜9のみです。 

J AN 標準にはフラグキャラクタが存在し 
ます （ JAN 短縮には存在しません）。フラグ 
キャラクタは，バーコードの左側6データ 
( D 2〜 D 7) のノぐーコードイメージ（奇数 
パリティのデータにするか偶数パリティの 
データにするか）を決定します。表4にお 
けるフラグキャラクタに対するデータキャ 
ラクタの組み合わせて，奇数パリティ （0 = 
Odd ) のコードを使うか，偶数パリティ （E 
= Even ) のコードを使ラかを決め，表 5 か 
らそのデータを決定します。 JAN 短縮の左 
側データは常に奇数ノ、。リティです。 

• モジュラスチェックキャラクタ 

これは， JAN コードの最後に示されてい 
るデータで読み取り精度の向上に用いられ 
ます。 

なお，この他のバーコードや，さらに詳 
しい内容については，専門の本におまかせ 


サンプルバーコード 


この バーコー ドプリントはすべて シヤー 
ものです。 

-プ製 BW - I 50 S 高速バーコードライターでプリントした 

1 ) NW -7 (2 of 7) 

2) CODE 39(3059) 

111111 

UII1 11111 

1 __ 

Jllllll 

3) JAN 標準 ( UPC / EAN ) 

4 ) JAN 短縮 

厘 _1« 

11111111111111111 

, I. 311111 

HI 
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MZ -1500 


サーキットエディタ 

The 部品箱 

Sato Nobuo 

佐藤信夫 

MZ - 1500で回路図などの図面を作成するグラフィックエディタができました。この “ The 
部品箱”は PCG を利用しているのでデータを入れ替えればさまざまな用途に使えます。ブ 
リントアウトはもちろん，画面スクロールやレイアウト表示も可能な便利なツールです。 


このプログラムは，回路図などを書くた 
めのエディタで， PCG によって登録した部 
品を画面上で組み合わせて図面を作成する 
というものです。みなさんはテンプレート 
というものをご存じでしよう力*。いろいろ 
な大きさの円や四角形などがくり抜かれた 
定規のようなもので，フローチャートを書 
くためのものや，実験器具の形に彫られた 
もの，住宅のテーブルやキッチン，トイレ 
マークの入ったものまで種々のものがあり 
ます。ようするに既製の形のものは部品化 
して利用したいというわけです。回路図で 
も抵抗やコンデンサなどはパーツデータと 
して用意しておいたほうがいいだろうとい 
うのがこのプログラムの基本です。ここで 
は PCG のフォントデータとして回路図用の 
パーッが登録されたものを掲載します力 5 ', 
MZ -1500 に同梱されている PCG エデ'ィタを 
使ってフォントデータを入れ替えればさま 
ざまな用途に利用することができるでしよ 
う。エディタの機能としては，種々のライ 
ンやボックス，消しゴムのほか，コピー機 
能や全体のレイアウトを見るマップ機能も 
あり，もちろん文字も書き込めます。画面は 


スクロールし，図面全体をプリントアウト 
することが可能です。 

入力方法 

このプログラムは4つの部分から成り立 
っています。 

•ブヒンバコ（リスト 1) 

ここでは単にマシン語ルーチンを読み込 
んでいます。セーブは， 

SAVE tt ブヒンバコ V 2.1 A ” 

としてください。 

• MAIN.BTX (リスト 2) 

いわずと知れたメインルーチンです。 
SAVE “ MAIN . BTX ” 

とします。 

• FONT.OBJ (リスト 3) 

PCG の定義をするプログラムです。 MZ - 
1500に付属の PCG エデイタで作ったデータ 
を G-RAM に転送するようになっています。 

LIMIT $AFFF : BYE 
を実行後， M コマンドでリスト2を入力し， 

• SB 000 CF 51 0000 “QD : FONT . OBJ ” 
でセーブしてください。 

• SUB . OBJ (リスト 4) 

これは図1にある 
サブルーチンパック 


図1 SUB . OBJ の内容 


アドレス 

ラベル 

働き 

$C 600 

SET 〇 HA 

(X, Y ) にキャラクタ No •でマップに害く 

$ C 603 

READCHA 

(X, Y) の位置のキャラクタ Na を読む 

$C 606 

し OADMAP 

マップデータを QD から読む 

$C 609 

SAVEMAP 

マップデータを 0D に害く 

$C 60C 

MAPDESP 

マップの一部を表示 

$C 60F 

KEIIN 

キー入力 

$C 612 

MAPPRINT 

レイアウト表示 

$C 615 

Ml HON 

パーツを害くときの見本を書く 

$C 618 

A しし〇し S 

マップをすべて消す 


です。これも BASIC 
のモニタで入力し， 

* S C 600 C 79 A 00 
00 tt QD : SUB . OBJ ” 
でセーブ L ます。 
ぃよぃよ， RUN 

“ブヒンバコ V 2.1 

A ” です。 


使い方 


まず [£ TRL | キーと日日キーでアイコンを 
選び， HI キーで処理を開始します。 

- tt QD ” QD のテ、、イレクトリを 

9] 表示し，セーブかロードかを聞 

- いてくるので [ FllfHI キーで答 

えてください。マップ名を入力するとセー 
ブまたはロードできます。 

“消しゴム” カーソルキーで， 
消したい範囲の左上にカーソル 
を動かし， （2 キーを押し，次に 
右下にカーソルをもっていき [S キーを押す 


B 


と，消してもいいか聞いてくるので， Y か 
N で答えてください。 





コ ピー “消しゴム”と同じよ 

うに，コピーした範囲を指定し， 
次に移動後の左上にカーソルを 


動かし， ICR 1 キーを柙すとコピーができます。 



“ペン” 
すよ 一。 


このペンは多機能で 


何を書きたいかを.数字キーで答えます。 

1 ) パーツ 

パーツを書きたい場所にカーソルを動か 
し，次に ICTRLI キーを押しながらカーソル 
キーでパーツを選びスペースを押すと書き 
込みます。 

2) ライン 

次に線のタイプを聞いてきます。 

① ごく普通の線 

② 交点がつながっていない線 t 

③ 交点がつながっている線+” 

④ バス用の線 
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コビー （移動） 


Z キー- 


U 




, x キー 

/ CR キーを 押す 


コピ- 


画面 


マップの一部 


パーツ 

表示部 


メッセージ 


アイコン 


PCG 利用図 

/ I 6 個分- 


145- 

257- 


513- 


593- 

625- 


769- 


変えない ' 


8 X 8 


I 6 X 16 


8 X 16 


使えない 


16 X 8 


変えない 


PCG エディタの" PCG フ 
オントの一覧表"と同じ 


-114 

-256 


512 


592 

624 


768 


■1024 


(例） 

□ PCG 1つ分 
N ••1 PCG 4っ分 
m PCG 2つ分 
H PCG 2っ分 


0 横線 




トランジスタ 


抵抗横 
抵抗縦 


■キーでペン ON ， 關キーでペン OFF 。 
ペンを ON に して カーソルを 動かすと線を 
引きます。 

3) 箱 

角の形と点線か実線かを聞いてきます。 

“消しゴム”と同様に箱の大きさを入力し 
て，線の種類を数字で入力してください。 
gg キーを 押すと戻ります。 

“キー” 字を書くときに使い 
ます。 カナ も使えます JSHIFTI 
キーで英小文字も使えます。 
間違えたら カーソル キーで戻し， スペース 
で消してください。 [ FT 1 で“で“"” 
が書けます。キーで戻ります。 


UAB 


MAP 


“マップ” 

全体のレイア 
ウトを見ると 
きに使います。 

“プリンタ” 
プリントアウ 
卜をします。 
以上が各アイコンの働 


a 


きと使い方です 。 ISHIFTI 

+カーソルキーでマップ 
のスクロールが 早送りに 
なります。 

なお数字で選ぶところ， Y or N で答える 


ところで 旧 REAKI キーを押すと処理を中断 
します。 

各アイコンで表示される，メッセージに 
従ってもらえば簡単に使ってもらえると思 
います。 

他目的への転用法 


:のプログラムを膂通に起動して ISHIFt 


+ 旧 REA 扣 でプログラムを止めて， PCG エ 
デイタを起動させます（データの名前には 
すべてキーを押すこと） PCGNO . 1〜 
144と769〜1000を変えずに，他の PCG を必 
要なキャラクタに変えでください。ただし 



ここでは青（カラーコード 1) 1色でキャ 
ラクタを作ってください。キャラクタの大 
きさによって PCG N 0がちがうので注意が 
必要です。 

キャラクタを作り終わったら， QD にセー 


ブしてから， IF 101 キーでエディタから抜け 
ます （ PCG エディタの使い方は，ューティ 
リテイアプリケーション•マニュアルをよ 
く読むこと）。 

NEW 國 
LIMIT SAFFF 國 
を実行して，部品箱の QD を入れ， 

LOAD “ FONT . OBJ ” 國 
先ほどの QD を入れ， 

LOAD “FONT ド国 
BYE [Cl 

としてモニタに移り， 

* X D 000 EF 3 F B 012 画 

* S B 000 CF 51 0000 “QD : FONT . 

OBJ ” 画 

と入力し， QD にセーブしてください。この 
プログラムを，もとのプログラムとかえて 
やれば OK です。あとは，それぞれ工夫し 
てみてください。 

さあ，この部品箱で，ハードに強くなろ 
ラ0 


lO ONERRORGOTO "ERROR" 

20 LIMIT MAX ： IF 24000 >=SIZE THEN PRINT"IS1|RUN"+CHR$<*22> + ••フ '•ヒン A** コ V2.1 A" : PRINT" 
CR 辛 - =} オシテクラ ' 1 サイ O"s NEW0N2 

30 PA し ,7 sINIT"CRTsI":C し S3sCURS0R7,6sPRINT"CIRCUIT EDI TOR"sCURS0R14,8sPRINT"THE" 
40 FPRINTC18,8],929,930,0,931,932,0,933,934,sFPRINTH IB,9 3,945,946,0,947,948,0,94 
9,950, : FPRINTC20,11 3,951： FOR I =952T0960 ： FPRINTI •• NEXT: CURS0R21,10 ： PRINT M V2.1A U 
50 PRINTTAB(10)；"HIWAIT A MOMENT!" 

60 し I MI T^AFFFs し OAD"FONT. OBJ "： USR( *BOOO > s し I MI T *C5FF ： し DAD•• SUB. OBJ" 

70 DIM CB<4> :DEFAU し T..QD: 

80 X=lsY=l ： CC=*5A ： CB<0)=0 ： CB(1)*=BsCB(2) =*48: CB<3) =¢88 ： CB(4)=*CB 
90 FOR I=$C7C5 TQ^CFFFSPOKE 1,0:NEXT 

100 PA し , 3,0:F0R I*0T03 ： F0R 0=0T015:P=<I+20> 拿 40+0+24:POKE tC7C5+P,I 拿 16+0+160SPOKE 
♦CB85+P,CB(4) ： NEXTO,I 

110 DEF KEY< 1)* ,, 0"：DEF KEY< 2> = " 月 : USR< *C618) 

120 CHAIN "MAIN.BTX" 

130 し ABE し "ERROR" 

140 IF ER し =60 OR ER し =120PRI 1^ 丁 " フ <> 13 ク'*ラ厶 / QD ヲイレテクレ ！" s WAI T 2000 
150 PRINT I> BEBBBBBHIT ANY KEY" 

160 GET K«：IF K*="" THEN 160 
170 RESUME 
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10 ON ERROR GOTO "ERROR*' 

20 CLS3 ： P0KE<CFF4,CB(0),1,1 ： USR(*C60C) 

30 OX=X ： OY=Y ： BOSUB"XYI" 

40 IF I*="B" BOSUB"Al_LCLS"sCLS 
50 IF PEEK(*E001)0191 THEN 80 ELSE X=OX ： Y=OY 
60 IF AND FC<6 THEN FC=FC+1 

70 IF AND FC>0 THEN FC=FC-1 

80 IF I*="B" THEN CURS0R26,Os PRINTMID*("QD ERASER MOVE KEY PEN MAP 

PRINTERi'jFCItT+l,?) :BEEP:ON FC+1 BOSUB ， , QD M , "E し ES" , ••MOVE" , "KEY" , "WRITE" , "MAP"," 

PRINTER" ： PAL,3,0,3 ： C し Ss BEEP ： GDSUB220 

90 FOR I=0T013：IF FC=INT(I/2)THEN CR=7E し SE CR=0 

100 CCO し OR 24+1,23,,CRsCCO し OR 24+1,24,,CR ： NEXT ： B0T030 

110 し ABE し "XYI" 

120 CURSORO, 0 ： PRI NT n POINT "USING ,, X= 轉 ##" 5 X5 s PRINTUSING" Y= ；Y 
130 IF PEEK<*E001 >=127 THEN RETURN 
140 USR(*C60F) : I*=CHR$(PEEK < *CFF4)) 

150 IF PEEK<»CFF4)=0 THEN 130 ELSE POKE $CFFF+WX+WY*40,0 • 

160 IF PEEK(*E001)=191 THEN 310 ELSE CX=12 ： CY=12 

170 IF PEEK<$E001)=254 THEN CS=5 ELSE CS=1 

180 IF 1¢=，.!!" THEN Y=Y-CS 

190 IF I*="l!“ THEN Y=Y+CS 

200 IF I WE" THEN X=X-CS 

210 IF THEN X=X+CS 

220 IF XMOOTHEN X = 100 

230 IF X<1 THEN X=1 

240 IF Y>60 THEN Y=60 

250 IF Y<1 THEN Y=60 

260 SX=X-11 ： SY=Y-11 

270 IF X<12 THEN CX=X ： SX=1 

280 IF X>88 THEN CX=X-76 ： SX=77 

290 IF Y<12 THEN CY=Y ： SY=1 

300 IF Y>48 THEN CY=Y-36 ： SY=37 

310 POKE SCFFF+CX+CY»40,*EF:WX=CX:WY=CY 

320 POKE 拿 CFF5,SX,SY 

330 USR(«C60C) 

340 RETURN 
350 し ABE し "2XYI" 

360 CURS0R24,17 ： PRINT"START SET <Z) " 

370 GOSUB"XYI"slF I*<> M Z" THEN 370 ELSE X1=X ： Y1=Y ： POKE^CFFO,X,Y ： USR(SC603) ： H1=PE 
EK(*CFF2) ： H2=PEEK(*CFF3)：POKE *CFF2,224,$C8 ： USR<<C600)：BEEP 
380 CURS0R24, 17sPRINT'*END SET <X) M 

390 GOSUB"XYI *'： IF I*<> "X"THEN 390 ELSE IF X<X1 AND Y<Y1 THEN 390 

400 X2=X ： Y2=Y ： POKE*CFFO,X,Y ： USR<»C603)sH3=PEEK(♦CFF2) ： H4=PEEK<*CFF3)：POKE »CFF2, 

225,*CB：USR < ¢0600)： BEEP 

410 CURS0R24,17sPRINTC7,1D"OK? Y)ES OR N)0"：BEEP 

420 IF PEEK($E001) = 127 THEN I 聲 =" Y"sG0T0440 ELSE GOSUB"XYI •* sIF PEEK<*CFF4)=0 THEN 
420 

430 IF ItO-N" AND I*<> ,, Y" THEN 420 

440 POKE *CFFO,X1,Y1,H1,H2：USR < 4C600) : POKE $CFFO,X2,Y2,H3,H4 ： USR(*C600) 

450 IF I*= n Y" THEN：RETURN 

460 G0T0360 

470 LABE し "BOXW" 

480 G0SUB M 2XYI"：IF PEEK(*E001) = 127 THEN RETURN ELSE C し SsGOSUB •• し TYPE"sIF PEEK(*E0 
01)=127 THEN RETURN 

490 Y2=Y2~Y1 ： X2=X2-X1 ： F0R I = 1T0X2 ： P0KE *CFFO,X1 + I,Y1,C1,8：USR < ¢0600 )s POKE *CFFO, 

X1+1,Y1+Y2,C2,8:USR(*C 600 )：NEXT 

500 FOR I=1TOY2：POKE *CFFO,X1,Yl+I,C3,8 ： USR( ¢0600 )：POKE $CFFO,X1+X2,Yl+I,C4,8：US 
R(*C600)：NEXT 

510 POKE*CFFO,XI,Y1,C5,8 ： USROC600) ： POKEtCFFO,X1,Y1+Y2,C6,8 ： USR(*C600) ： POKE*CFFO 
,Xl + X2,Yl,C7,8sUSR < »C600) : POKESCFFO,X1+X2,Y1+Y2,C8,8:USR(*C600) ： GOTO"WRITE" 

520 し ABE し "E し ES M 

530 G0SUB"2XYI"：IF PEEK<*E001)=127 THEN RETURN 

540 FORXI=X1TQX2 : FORYI=Y1T0Y2 : POKE HCFFO,XI,YI,0,0 ： USR(*C600) 

550 CURSORO,0：PRI NT n £RASING "USING M X= 轉轉林 " 5XI5sPRINTUSING" Y= 特林 "； YI 

560 NEXT YI,XI 

570 RETURN 

580 し ABE し "MOVE" 

590 G0SUB n 2XYI"：IF PEEK<*E001)=127 THEN RETURN ELSE CURS0R26,17 ： PRINT"SET PONIT< 

CR)" 

600 GOSUB"XYI"sIFI*<>CHR*(13)THEN 600 
610 X3=X ： Y3=Y 

620 X3=X3-X1:Y3=Y3-Y1 ： X2=X2 ： Y2=Y2 
630 IF0<X3THENXX=XlsXl=X2sX2=XX 
640 IF0<Y3THENYY=Y1 : Y1=Y2 ： Y2=YY 

650 IFX1>X2THENF0R XI=X1T0X2STEP-1E し SEF0RXI=X1T0X2 
660 IFY1>Y2THENF0R YI=Y1T0Y2STEP_1E し SEF0RYI=Y1T0Y2 
670 IF YI<1 OR YI>60 OR XI<1 OR XIMOOTHEN 700 

680 POKE*CFFO,XI,YI：USR < *C603)sPOKE *CFFO,XI+X3,YI+Y3：USR < *C600) 

690 CURSORO, 0 ： PR I NT H MOVE I NG "USING"X= ### '* ； XI ； ： PRI NTUSI NG M Y= 

700 NEXTYI,XI 

710 RETURN 

720 し ABEL 1 • し TYPE" 

730 CURS0R24,17 ： PRI NT "CORNER TYPE" ： PRI NTTAB( 24 ) 5 "1)n 2 〉门 3 > ハ••： PRI NTTAB< 26〉； " 

LJ |__| »• 

740 GET I 搫 

750 IF THENC1=<18 ： C2=*18 ： C3=*19 ： C4=*19 ： C5=*54 ： C6=*64 ： C7=*55 ： C8=*65 ： GOTO 800 

760 IF I2"THENCl=«lCsC2=*1D ： C3=*1Es C4=*1F ： C5=*58 ： C6=*68 ： C7=*59 ： C8=*69：BOTOQOO 
770 IF I*=»3 ,, THENCl=*18sC2=*1B ： C3=*19 ： C4=*19*C5=*50 ： C6=*60 ： C7=*51 ： C8=*61s RETURN 
780 IF PEEK(*E001)=127 THEN RETURN 
790 GOTO 740 

800 CURS0R24,17sPRINT"1)POINT LINE " ； TAB<24)J"2) NOMA し LINE " ； TAB(24) ； " し I 
NE TYPE " 

810 GET I* 

820 IF VA し <I$><4 AND VAL<I*)>0 THEN GOSUB"COLOR" 

830 IF I*="1"THEN C1=C1+16 ： C2=C2+16sC3=C3+16 ： C4=C4-H6 ： C5=C5-2 ： C6=C6-2 ： C7=C7-2 ： C8 
=C8-2：RETURN 

840 IF.I«="2i , OR PEEK(*E001)=127 THEN RETURN 

►とうとう今年もあと1力月になってしまいました。私は就職も決まり，愛枝 « V 1 Z - 2000の 
前でカチカチやっている今日この頃であります。近頃かぜが流行しているようなので，皆 
さんも気をつけてください。もしひいてしまったら，必ずネピアで鼻をかんでください。 
私は王子製紙に入社したのです。 福地敏男 （17) 北海道 


184 Oh! MZ 1986.1. 







850 G0T0810 

860 し ABE し"し INE M s し C=1 

870 CURS0R24,17s PRINT" 1 )NCJMA し LINE "；TAB<24)； M 2)JUMP CROSS "；TAB(24)； M 3)C 

ONTACT CROSS " ?TAB(24) 5 "4)BUNCH LINE.. 

880 GET It 

890 IF VAL(Ii>><5 AND VA し <I»>>0 THEN GOSUB"CO し OR" 

900 IF THEN CC=*70：CE=OsCD=0 

910 IF I *="2" THEN CC=*11：CE=0：CD=0 

920 IF I ¢="3" THEN CC=*10：CE=2sCD=0 

930 IF I *="4" THEN CC=*70：CE=-2：CD=-4 

940 IF PEEK(*E001)=127 THEN BEEP:GOTO"WRITE" 

950 IF V/A し （I*><1 OR VAL(I*)>4 THEN 880 
960 CURSOR 26 ,0SPRINT"PEN OFF" 

970 GQSUB" XYI *' ： G0SUB220 

980 IF 1¢="月" THEN し C=1sBEEP:CR=OsCURS0R26,OsPRINT"PEN OFF" 

990 IF IWB" THEN し C=0: BEEP: CR=0: CURS0R26,0: PRINT..PEN ON " 

1000 IF I*=CHR*(13)THEN C し S:GDTO"WRITE" 

1010 IF し C THEN 970 
1020 XO=X：YO=YsIQ$=I* 

1030 GOSUB_.XYI":IF PEEK (*CFF4 ) =OTHEN 1030 
1040 POKE tCFFF+CX+CY 拿 40,<1B 

1050 POKE *CFFO,X,Y：USR(*C603)：CM=PEEK(»CFF2) 

1060 IF IO«=It AND (I *="|| n OR I ¢="1!" ) THENCR=*19 

1070 IF IO«=I$ AND(I*= n B" OR I<= , *B , ')THENCR=* 18 

1080 IFCM=*18 AND CR=$19THENCR=CC:GOTO1230 

1090 IFCM=«19 AND CR=<18THENCR=CC : G0T01230 

1100 IF PEEK(*E001 )0191 THEN 1150 

1110 I FI «= "SI" THENCR=$6D-CE : GOTO1240 

1120 IFI$="I!"THENCR=*5C-CErB0T01240 

1130 IFI*="B"THENCR=*5D-CE : B0T01240 

1140 IFI*="B"THENCR=*6C-CE : GOTO1240 

1150 IFI 0¢= "E"ANDI*="U"THENCR=*65+CD : GOTO1240 

1160 I FI0*="E"ANDI %= n ||"THENCR=*64+CD : GOTO1240 

1 170 IFIOSs'.E'.ANDISsMir.THENCRsSSS+CDsGOTOlS^O 

1180 IFI0*= ,, B ,, ANDI*="I!"THENCR=*54+CD：G0T 01240 

1190 IFI□*="ir ANDI<= M B"THENCR=*65+CD : GOTO1240 

1 200 I FI 0¢= ANDI $= "B"THENCR=*55+CD： GOTO1240 

1210 IFI0*="|!' , ANDI*= ,, B ,, THENCR=*64+CD：G0T01240 

1220 IFI0*= n U ,, ANDI*= ,, E"THENCR=*54+CD：G0T01240 

1230 POKE SCFFO,X,Y,CR,8：USR(*C600) : I0$=I %: GQT0980 

1240 POKE *CFFO,XO,YO,CR,8s X=XO：Y=YO：USR<*C600) : G0T0980 

1250 POKE *CFFO,XO,YO,CR,8：USR(«C600) : G0T0980 

1260 LABEL "WRITE" 

1270 CURS0R24,17： PRINTTAB<24) ； '* 1)PARTS •• iTAB<24> 5 "2> し INE " ；TAB( 

24) ；"3)B0X n ；TAB(24) ；"4)WRITE END.. 

1280 GET I* 

1290 IF VA し <IS><5 AND VA し（1漆>>0 THEN BPSUB"CO し OR" 

1300 IF I ¢="2" THEN ••LINE" 

1310 IF I ¢=..3" THEN "BDXW.. 

1320 IF I$="4 H RETURN 

1330 IF PEEK(*E001)=127 THEN RETURN 

1340 IF I*<> M 1" THEN 1280 

1350 CA=0：ZY=1：ZX=1：MY=0：MX=0：P0KE*CFF3,$18：USR<*C615) 

1360 CONSO し El,16,24,16：XO=X : YQ=Y：QX=MX : QY=MY 

1370 USR < *C60F)：IF PEEK < *CFF4> <>0THENPDKE*CFFF+WX+WY<t40,0,0：POKE*CFFF+WX+<WY+1> 拿 
40,0,0：GOSUB M XYI"：CURSOR1,24：PRINT H B H ELSE 1370 
1380 IF PEEK<*E001 >O191THEN1470E し SE X=XO： Y=YO 
1390 IF THEN MY=MY-ZY 

1400 IF hY<0 THEN MY=0：CA=ABS((CA-1)M0D3)：MX=0 
1410 IF THEN MY=MY+ZY 

1420 IF MY>15 THEN MY=0：CA=ABS<(CA+i)M0D3) : MX=0 

1430 IF AND MX>0 THEN MX=MX-ZX 

1440 IF AND MX<15THEN MX=MX+ZX 

1450 IF CA=2 AND(MY=5 OR MY=6)THEN MX=0 

1460 POKE tCFF3,CB(CA-H )：USR<*C615) 

1470 IF CA=0 THEN ZX=1：ZY=1：POKE *D018+MX+(MY+1>*40, 奉 EF 

1480 IF CA=1 THEN POKE $CFFF+CX+CY 拿 40,*EF,$EFsPOKE ，CFFF+CX+<CY+U 拿 40,*EF,*EFsZX 
=2sZY=2：P0KE 幸 D018+MX+<MY+1> 拿 40,*EF,$EFsP0KE$D0i8+MX+<MY+2><t40,<EF,*EF 
1490 IF CA=2 AND MY<=6 THEN POKE 搴 CFFF+CX+CY*40, ZX=2s ZY=1 _• POKE >D018+MX + 

<MY+1> 拿 40,*EF,*EF * 

1500 IF CA=2 AND MY>6 THEN POKE 拿 CFFF+CX+<CY+1> 拿 40,*EF:ZX=1:ZY=2:P0KE*D018+MX+<MY 

+ 1> 拿 40,P0KE$D018+MX+(MY+2> 拿40, <EF 

1510 IF I*=CHR*(13)THEN CONSOLEJBOTO"WRITE'* 

1520 IF I 搴 <>•• 11 THEN 136 OE し SE BEEP 
1530 CR=MX+MY*16 

1540 IF CA=0 THEN POKE ♦CFFO,X,Y,CR,8：USR($C600) 

1550 IF CA=1 THEN POKE *CFFO,X,Y,CR, ¢48: USR<»C600) : POKE «CFFO,X+1,Y,CR+1,<48：USR 
<*C600)：POKE *CFFO,X,Y-H,CR+16,$48：USR(*C600)：POKE SCFFO,X + 1,Y+1,CR+17, ¢48： USR < * 
C600) 

1560 IF CA=2 AND MY<=7 THEN POKE *CFFO,X,Y,CR, ¢88 ：USR(*C600) : POKE *CFFO,X+l,Y,CR 
+1,*88：USR(*C600) 

1570 IF CA=2 AND MY>=6 THEN POKE *CFFO,X,Y,CR,*8B : USR< *C600)：POKE <CFFO,X,Y+l,CR 
+16,S88：USR(*C600) 

1580 GOTO1360 
1590し ABE し "KEY" 

1600 CURS0R26,17:PRINT..ALP" 

1610 GOSUB"XYI M 

1620 IF PEEK<*CFF4)=0 THEN 1610 

1630 IF I$=CHR»<13)：PRINTCHR*(25)：RETURN 

1640 IFX>100THENX=0E し SECH=_1 

1650 CH=-1 

1660 IF ASC(I*X=24THEN 1610 

1670 IF I5=CHR«(26) THEN PRI NTCHR* < 26) ： BEEP： CURS0R26,17： PRI NT'* r H ：S0T01610 

1680 IF I*=CHR*<25) THEN PRINTCHR*(25>sBEEPsCURS0R26,17:PRINT"A し P":GOTO 1610 

1690 IFI*> = ,, A , * ANDI*< = "Z"THENCH=ASC(I ♦ )-65 : 1F PEEK( *E001)=254THENCH=CH+26 

1700 IFIO = M 0 M ANDI*< = n 9"THENCH=ASC(1*)+4 

1710 IFI*> = ,,S ?" ANDI *< = ,,# "THENCH=ASC (I *) -72 

1720 I FI $=••-•_ THEN CH=128 

1730 IFI*=" + '?THEN CH=129 

1740 IFI*= "ノ" THEN CH=130 

1750 IFI*="*"THEN CH=131 

1760 IFI*= ,, B ,, THEN CH=132 

1770 IFI$= "月" THEN CH=133 


►最近，大好きな女性ができてしまったせいか，ターボ君にさわる機会が非常に少なくな 
ってきている。だから，うちのターボ君は主人の言うことをなかなか聞いてくれない。ホ 
ントに焼きもちやきで困ってしまいます。 高津誠（26> 爱知 W 
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f UB l UUIU MZ P.17y の谄野さん，払もフル涯旃の1500を便っていますが， KAM フ 
イルの調子がよくないのはボード上のクリスタル不良です 0 私も同じことを経験してい 
ので，保陣の効いているうちに早く修理に出したほうがいいですよ。 

久野展宏（21> 愛知 


1780 IFI*= M ."THEN CH=144 
1790 IFI*=","THEN CH=145 
1800 IFI$="("THEN CH=146 
1810 IFI*= n )"THEN CH=147 
1820 I FI $=••$..THEN CH=148 
1830 I FI ¢="7. "THEN CH=149 
1840 I FI WV. THEN CH=150 
1850 IFI$= ,, = ,, THEN CH=151 

1860 IFI$= H "THEN POKE $CFF0,X,Y,0,0 ： USR(*C600) : X=X+1 : S0T01890 

1870 IFCH=-1 THEN BEEP ： B0T01610 

1880 POKE tCFFO,X,Y,CH,»C8 ： USR(»C600) ： X=X+1 

1890 POKE*CFFF+CX+CY* 40 ,0:G0SUB220:G0T01610 

1900 LABE し "QD" 

1910 PA し , 0,0 ,0sPRINT.'l31^KS3QD MODE" 

1920 DIR ： PRINTTAB(7) ；"SAVE OR し OAD?" : PRINTTAB(3> " <F1OR F2 >.. 

1930 GET K$：IF K$= n B"THEN 1970 
1940 IFK*= " 月 " THEN 1990 
1950 IF PEEK(»E001)=127 THEN RETURN 
1960 GOTO 1930 

1970 PRINT" SAVE! u ： INPUT"MAP NAME7"JF し IF し EN<F し生 ） >11 THEN F し $= し EFT$<F し车 , 16> 
1980 USR<$C 60 9,F し漆 >SPA し , 3sRETURN 

1990 PRINT" し OAD!"sINPUT"MAP NAME*?"JF し $ : IF し EN(FL$)>11 THEN F し S= し EFT$<F し 16> 
2000 USR($C 60 F し *) SPA し , 3sRETURN 
2010 し ABE し ,, MAP" 

2020 PA し , 0,7,7:CLSsFPRINTC0,0 ； UF0R I =1T01000 ： FPRINTI ： NEXT ： PRI NyaiiSaEBSMAP OF し 

AYOUT"：POKE *108D,2,1 

2030 USR(*C612)：POKE *CFF3,0 

2040 CURSOR 10,23 ： PRINT n HIT ANY KEY." 

2050 GET 1$：IF I»="" THEN 2050 

2060 PA し , 3,0,3s C し S2s USR< $ 0615 ) sRETURN 

2070 し ABE し "ALLCLS" 

2080 C1-S3SPRINT"BBWA しし C し EAR OF MAP" 

2090 PRINTTABC10) ； "DK?" 

2100 GET I» ： IFI*="" THEN 2100 
2110 IF I*="Y M THEN USR(«C618) 

2120 USR (i>C60C)s RETURN 
2130 LABE し "PRINTER" 

2140 PRINT/P CHR«(*9) 

2150 FOR XI =1OOTO1STEP-1：PRI NT/P CHR*(*1B,*18,*E0, ¢1 )?：FOR YI=1T060 
2160 CURS0R0,0 ： PRINT"PRINTING "USING ,, X= " ； XI ； ： PRINTUSING*' Y= ## H ；YI 

2170 POKE $CFFO,XI,YI ： USR( ¢0603 ) : CN=PEEK(SCFF2) 

2180 IF PEEK(«CFF3)=0 THEN A*=HEXCHR*< "0000000000000000" ) : G0T02240 

2190 IF PEEK(«CFF3)= 8 THEN CR=CN+1 

2200 IF PEEK(*CFF3)=»48 THEN CR=257+CN 

2210 IF PEEK<$CFF3)=¢88 THEN CR=513+CN 

2220 IF PEEK(*CFF3)=*C8 THEN CR=769+CN 

2230 し EFT*<FDNT$<2,CR>,8> 

2240 USR(*C61B,A») 

2245 NEXT YI：NEXT XI：RETURN 
2250 LABE し "CO し OR" 

2260 CO=VA し <1 ¢〉 

2270 FOR CU=1T04：IF CO=CU THEN CP=7 ELSE CP=2 
2280 FOR CI=24T039:CC0 し ORCI ,16+CLI,2,CP:NEXT Cl , CU 
2290 RETURN 
2300 し ABE し "ERROR" 

2310 FORI =1T05 : WAIT300 SPRINT "EIBEEMHQffiC AUTI ON ! ! : BEEP: WAI T250: PRINT‘_HHBBEBEE 
E£BE H" ： WAIT300 ： NEXT ： PRINTTAB(5 )； 

2320 IF ERN=46 PRINT.'QD WRITE PROTECT" 

2330 IF ERN=53 PRINT"TOO MANY MAPS" 

2340 IF ERN=40 PRINT"MAP FILE NOT FOUND" 

2350 IF ERN=42 PRINT"I しし EGA し MAP 5 S NAME" 

2360 IF ERN=50 PRINT'.QD OFFLINE" 

2370 IF ERN=60 PRINT"A し READY EXIST" 

2380 IF ERN=61 PRINT M NOT MAP^S FILE" 

2390 IF ERN=65 PRINT"PRINTER OFF し INE":WAIT 200 0:RESUME20 
2400 PRINTTAB(IO)；"HIT ANY KEY" 

2410 GET K*：IF K«=*'*' THEN 2410 
2420 RESUME "QD" 



coi 













































BOOO 

21 

12 

BO 

11 

00 

DO 

01 

00 

C5 


B278 

00 

00 

00 

00 

00 

00 

00 

00 

：00 


B4D8 

06 

00 

00 

00 

00 

00 

00 

00 :06 

B008 

20 

3E 
































匕 o 

















tJHtU 

vU 

UU 

UU 

UU 

UU 

UU 

UU 

UU 、 

■ UU 

B010 

E6 

C9 

00 

00 

00 

00 

00 

00 

AF 


SUM ： 

08 

08 

00 

00 

00 

00 

00 

00 : 

:10 


B4E0 

00 

00 

00 

00 

00 

00 

00 

00 ：00 

B018 

00 

00 

00 

00 

00 

00 

00 

00 

00 













B4F0 

00 

00 

00 

00 

00 

00 

00 

00 : 

:oo 

B020 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B2B0 

00 

00 

00 

00 

00 

00 

00 

00 

:00 


B4F8 

00 

00 

00 

00 

00 

00 

00 

00 ：00 

B028 

00 

00 

00 

00 

00 

00 

00 

00 



B28G 

00 

00 

00 

00 

00 

00 

















UU 














B030 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B 290 

00 

00 

00 

00 

00 

03 

04 

08 

： 0F 


SUM ： 

F6 

30 

FC 

DE 

94 

88 

6 E 

4E ： D8 

B038 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B298 

08 

08 

00 

00 

00 

EO 

10 

08 ! 

：08 












B040 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B2A0 

08 

08 

00 

00 

00 

09 

08 

00 

：21 












B048 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B2A8 

00 

08 

00 

00 

00 

98 

08 

00 : 

: A8 


(B 500 〜 B 57 F は 00 で埋めてください） 
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FI 

29 

25 

CO 

ウ T 


















r r 

1 し 



DOoU 



UU 

UU 

UU 

UU 

UU 

UU 


SUM ： 

27 

19 

B1 

E4 

E5 

BD 

B1 

D3 : FB 


B2E8 

08 

08 

00 

08 

1C 

FC 

1C 

08 ! 

:5C 


B5B8 

00 

00 

08 

48 

7F 

09 

14 

22 

OE 












B2F0 

08 

08 

00 

00 

00 

FF 

08 

08 : 

! IF 


B5C0 

41 

7F 

C6 

A4 

94 

8 F 

94 

A4 

85 

B080 

B088 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B2F8 

08 

08 

08 

08 

08 

F8 

08 

08 : 

：30 


B5C8 

B5D0 

CC 

00 

no 

7F 

at 

41 

22 

oo 

14 

c i 

09 

OO 

7F 

Oer 

4A 






















^to 

v/a 



jLri 

r 1 



HU 

B090 

00 

00 

OB 

08 

1C 

FF 

1C 

08 

4F 


SUM ： 

39 

4A 

40 

91 

41 

7F 

FE 

Cl : D3 


B5D8 

33 

00 

00 

00 

00 00 

00 

00 

33 

B098 

08 

OB 

08 

1C 

2A 

C9 

08 

08 

37 













B5E0 

00 

00 

00 

24 

24 

E7 

24 

24 

77 

BOAO 

08 

08 

OB 

08 

08 

08 

3E 

1C 

8 A 


B 300 

08 

08 

00 

00 

00 

FF 

04 

08 

IB 


B5E8 

00 

00 

08 

08 

3E 

00 

00 

3E 

8 C 

BOAS 

08 

00 

00 

08 

ic 

3E 

08 

08 

7A 


B308 

08 

08 

08 

08 

08 

E8 

18 

08 

30 


B5F0 

08 

08 

00 

00 

00 

00 

00 

00 

10 

BOBO 

B0B8 

08 

00 

08 

00 

3E 

08 

1C 

08 

08 

09 

FF 

OB 

00 

OF 

00 

OB 

71 

3E 


B310 

B318 

08 

00 

08 

00 

08 

08 

08 

08 

04 

10 

03 

EO 

00 

00 

00 

00 

27 

00 


B5F8 

00 

00 

00 

34 

2C 

F7 

2C 

34 

B7 













BOCO 

09 

08 

22 

14 

08 

FF 

00 

00 

4E 


B320 

00 

00 

08 

00 

00 

09 

00 

00 

11 


SUM ： 

CO 

16 

26 

C4 

4A 

17 

03 

6 A ：8 E 

B0C8 

00 

00 

08 

08 

09 

OA 

OC 

OA 

39 


B328 

00 

00 

08 

00 

00 

98 

00 

00 

AO 












BODO 

09 

08 

00 

00 

00 

FF 

00 

00 

10 


B330 

00 

00 

08 

08 

08 

OF 

00 

00 

27 


B600 

00 

00 

08 

08 

3E 

14 

2A 

3E 

CA 

B0D8 

00 

00 

08 

08 

08 

08 

08 

08 

30 


B338 

00 

00 

08 

08 

08 

F8 

00 

00 

10 


B 608 

OB 

08 

00 

00 

00 

00 

00 

00 

10 

BOEO 

08 

08 

00 

04 

08 

FF 

20 

40 

7B 


B340 

00 

00 

00 

00 

80 

80 

00 

00 

00 


B610 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B0E8 

00 

00 

08 

OA 

OC 

08 

18 

28 

66 


B348 

80 

99 

01 

00 

00 

01 

01 

00 

1C 


B618 

00 

00 

00 

00 

00 

00 

00 

00 

00 

BOFO 

08 

08 

FF 

00 

00 

00 

00 

00 

OF 


B350 

00 

99 

80 

80 

80 

80 

80 

80 

99 


B620 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B0F8 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B358 

B360 

80 

01 

FF 

FF 

01 

08 

01 

08 

01 

1C 

01 

IF 

01 

1C 

01 

08 

85 

6 F 


B628 

B630 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 













SUM ： 

42 

38 

97 

QA 

A8 

2F 

C5 

B9 SFO 


B368 

08 

08 

00 

08 

1C 

FF 

1C 

00 

57 


B638 

00 

00 

00 

00 

00 

00 

00 

00 

00 












B370 

00 

00 

08 

08 

08 

OF 

08 

08 

37 


B640 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B100 

B108 

00 

80 

FF 

80 

80 

01 

BO 

01 

80 

01 

80 

01 

80 

01 

80 

01 

FF 

06 


B378 

08 

08 

08 

08 

08 

FF 

00 

00 

27 


B64Q 
B 650 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 













BllO 

01 

01 

08 

14 

08 

08 

08 

08 

3E 


SUM ： 

29 

58 

DA 

C9 

75 

AO 

DE 

A1 : B8 


B658 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B118 

08 

08 

00 

00 

02 

FD 

02 

00 

11 













B660 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B120 

00 

00 

00 

00 

40 

BF 

40 

00 

3F 


B380 

00 

00 

08 

08 

OC 

OB 

08 

oe 

37 


B66B 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B128 

00 

00 

08 

08 

08 

08 

08 

08 

30 


B388 

08 

08 

00 

08 

10 

FF 

00 

00 

2F 


B670 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B130 

B138 

14 

08 

08 

08 

00 

08 

00 

08 

00 

28 

FF 

D8 

OB 

28 

14 

08 

37 

50 


B390 

B398 

00 

08 

00 

08 

08 

08 

08 

1 O 

FF 

24 

08 

24 

08 

1 G 

27 

88 


B678 

00 

00 

00 

00 

00 

00 

00 

00 

00 


UU 

UU 

1 a 












B140 

08 

08 

08 

14 

08 

FF 

00 

00 

33 


B3A0 

00 

00 

00 

00 

00 

00 

00 

00 

00 


SUM ： 

08 

08 

08 

08 

3E 

14 

2A 

3E : DA 

B148 

00 

00 

08 

08 

OA 

OD 

OA 

08 

39 


B3A8 

00 

00 

00 

00 

00 

00 

00 

00 

00 












B150 

OB 

08 

00 

00 

00 

99 

00 

00 

A9 


B3B0 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B680 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B15G 

00 

00 

08 

00 

00 

08 

08 

00 

18 


B3B8 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B688 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B160 

00 

08 

08 

08 

08 

08 

7F 

55 

FC 


B3C0 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B690 

00 

00 

08 

08 

08 

3C 

00 

00 

54 

B168 

2A 

54 

00 

00 

00 

00 

00 

00 

7E 


B3C8 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B698 

00 

FF 

00 

00 

00 

3C 

00 

00 

3B 

B170 

00 

00 

99 

00 

00 

00 

00 

00 

99 


B3D0 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B6A0 

00 

FF 

00 

00 

00 

00 

00 

00 

FF 

B178 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B3D8 

B3E0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B6A8 

B6B0 

00 

80 

00 

80 

80 

BO 

80 

80 

88 

G0 

8 F 

88 

88 

88 

88 

88 

27 

20 













SUM ： 

DF 

04 

52 

C9 

15 

D9 

94 

OA ：8 A 


B3E8 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B6BQ 

80 

80 

00 

00 

00 

00 

00 

00 

00 












B3F0 

00 

00 

08 

OC 

OA 

OB 

OC 

08 

3D 


B6C0 

00 

00 

18 

FF 

00 

42 

A5 

42 

40 

B180 

B188 

00 

00 

99 

80 

00 

01 

00 

00 

00 

00 

80 

01 

80 

01 

00 

00 

19 

83 


B3'^8 

08 

08 

00 

00 

00 

FF 

12 

OC 

2D 


B6C8 

PAHA 

00 

00 

00 

00 

00 

r%a 

00 

A>L 

00 

00 

AO 

00 













OOUU 

UU 





^to 

HO 


MO 

B190 

00 

01 

CO 

30 

OC 

03 

00 

00 

00 


SUM ： 

18 

18 

20 

24 

46 

37 

52 

3C ： 7F 


B6D8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B198 

00 

00 

00 

00 

00 

00 

00 

00 

00 













B6E0 

00 

00 

48 

54 

48 

CO 

CO 

48 

AC 

B1AO 

00 

00 

03 

OC 

30 

CO 

00 

00 

FF 


B 400 

08 

08 

00 

00 

00 

FF 

10 

08 

27 


B6E8 

54 

48 

00 

00 

00 

00 

00 

00 

9C 

B1A8 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B408 

08 

OB 

08 

08 

18 

E8 

08 

08 

30 


B6F0 

00 

00 

08 

14 

IB 

20 

40 

48 

DC 

BIBO 

B1B8 

00 

20 

00 

CO 

00 

00 

00 

00 

00 

00 

03 

00 

OC 

00 

10 

00 

IF 

EO 


B410 

B418 

08 

00 

08 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

10 

00 


B6F8 

94 

08 

00 

00 

00 

00 

00 

00 

9C 













B1CO 

00 

00 

00 

00 

00 

CO 

30 

08 

F8 


B420 

00 

00 

00 

00 

00 

00 

00 

00 

00 


SUM ： 

E8 

4E 

BO 

9F 

80 

F7 

5A 

24 ： 7A 

B1C8 

04 

03 

00 

00 

00 

00 

00 

00 

07 


B428 

00 

00 

00 

00 

00 

00 

00 

00 

00 












B1DO 

B1D8 

00 

80 

00 

80 

08 

08 

08 

08 

10 

04 

20 

04 

40 

02 

40 

02 

CO 

1C 


B430 

B438 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 


(B 700 〜 B 7 FF は 00 で埋めてください） 


B1EO 

01 

01 

00 

00 

00 

00 

00 

00 

02 


B440 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B 800 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B1E8 

00 

00 

01 

01 

02 

02 

04 

04 

OE 


B448 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B808 

00 

00 

00 

00 

00 

00 

00 

00 

00 

B1FO 

08 

08 

00 

00 

00 

00 

00 

00 

10 


B450 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B810 

00 

00 

07 

19 

21 

41 

41 

81 

44 

B1F8 

00 

00 

80 

80 

40 

20 

10 

10 

80 


B458 

B460 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B818 

B820 

9F 

F2 

83 

82 

CO 

07 

30 

18 

08 

20 

04 

FC 

04 

42 

02 

81 

24 

72 













SUM ： 

AD 

66 

D5 

CD 

92 

4D 

13 

6 E ：15 


B468 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B828 

80 

87 

EO 

18 

04 

42 

42 

41 

CB 












B470 

00 

00 

08 

18 

24 

FF 

00 

00 

43 


B830 

Cl 

FF 

OB 

OC 

18 

28 

28 

4B 

87 

B 200 
B208 

08 

00 

08 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

10 

00 


B478 

00 

00 

08 

08 

18 

E8 

28 

18 

50 


B838 

B840 

44 

91 

42 

A1 

E8 

07 

18 

18 

OC 

20 

OA 

43 

OA 

43 

89 

83 

2F 

7A 













B210 

00 

00 

00 

00 

00 

00 

00 

00 

00 


SUM ： 

18 

18 

18 

28 

54 

CE 

40 

28 sFA 


BQ48 

83 

FF 

EO 

18 

04 

3F 

42 

81 

80 

B218 

00 

00 

00 

00 

00 

00 

00 

00 

00 













B850 

El 

01 

07 

18 

20 

40 

40 

8 F 

30 

B220 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B480 

OB 

08 

08 

08 

08 

OB 

OC 

08 

47 


B858 

02 

84 

EO 

98 

84 

82 

82 

F9 

FF 

B228 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B488 

08 

08 

08 

00 

04 

FF 

00 

00 

23 


B860 

41 

29 

03 

OC 

10 

FF 

20 

40 

E8 

B230 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B 490 

00 

00 

08 

14 

08 

14 

22 

41 

9B 


B868 

40 

40 

EO 

18 

04 

22 

A2 

61 

A1 

B238 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B498 

7F 

08 

60 

50 

4A 

C5 

4A 

50 

EO 


B870 

21 

3F 

10 

17 

18 

30 

50 

50 

6F 

B240 

B24Q 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B4A0 

〇 yi /\q 

60 
i A 

00 

08 

njL 

7F 

r%/\ 

41 

22 

/v-y 

14 

ET 〇 

08 

66 
—j r\ 


B878 

9C 

98 

10 

FO 

18 

M 

12 

12 

84 


onRa 

1 H 

Uo 

Uo 

UH 




UR 

/u 












B250 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B4B0 

06 

00 

00 

00 

00 

00 

00 

00 

06 


SUM ： 

CB 

32 

72 

A8 

7D 

5E 

66 

A5 : FD 

B258 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B4B8 

00 

00 

08 

08 

oe 

14 

22 

41 

0F 












B260 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B4C0 

7F 

08 

60 

50 

48 

C7 

48 

50 

DE 


B880 

11 

11 

07 

18 

20 

44 

44 

85 : 

：6 E 

B268 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B4C8 

60 

00 

08 

7F 

41 

22 

14 

08 



B88Q 

86 

FC 

CO 

30 

08 

7F 

B4 

02 ： 7F 

B270 

00 

00 

00 

00 

00 

00 

00 

00 

00 


B4D0 

08 

08 

06 

OA 

12 

E3 

12 

OA 

31 


BB90 

02 

02 

85 

89 

91 

50 

50 

30 ：73 


►毎月， Oh/MZ の発売日の 18 日が待ちどおしくて， 11 月のように 17 日が日曜日だったり _ 

すると，「どっかの本屋さんが-日早いけど，うっかりして店頭に並べているかもしれな The 部品箱 1〇 ’ 

い j と考え，つい本屋さんめぐりをしてしまうのでした。 山本勇（36> 千葉県 


































B89S 

18 

17 

42 

22 

12 

14 

14 

18 

E5 


BB18 

10 

10 

00 

00 

80 

80 

EO 

10 

10 


BD98 

OF 

08 

19 

39 

OA 

OA 

OC 

18 

A1 

B8A0 

30 

DO 

80 

81 

42 

FC 

20 

18 

77 


BB20 

28 

E8 

00 

00 

FF 

SO 

7C 

52 

5D 


BDAO 

E8 

08 

40 

42 

23 

FF 

10 

OC 

BO 

B8A8 

07 

00 

Cl 

41 

42 

42 

04 

18 

A9 


BB28 

32 

29 

00 

00 

00 

CO 

20 

10 

4B 


BDAQ 

03 

00 

61 

A1 

22 

A2 

04 

18 

E5 

BGBO 

EO 

00 

41 

4F 

40 

20 

20 

10 

00 


BB30 

10 

1C 

30 

28 

27 

20 

20 

23 

OE 


BDBO 

EO 

00 

94 

82 

9F 

40 

40 

20 

35 

B8B8 

OC 

03 

Cl 

F9 

81 

82 

82 

84 

D2 


BB38 

24 

24 

OC 

34 

D4 

74 

94 

14 

78 


BDB8 

18 

07 

21 

41 

FI 

02 

02 

04 

7A 

B8C0 

98 

EO 

83 

82 

42 

42 

20 

18 

39 


BB40 

64 

84 

00 

00 

00 

03 

04 

08 

F7 


BDCO 

18 

EO 

86 

85 

44 

45 

20 

18 

C4 

B8CQ 

07 

00 

01 

81 

42 

3F 

04 

18 

26 


BB48 

oe 

38 

00 

00 

FF 

01 

3E 

4A 

ca 


BDCQ 

07 

00 

02 

42 

C4 

FF 

08 

30 

46 

B8D0 

EO 

00 

8G 

88 

48 

48 

2B 

18 

CO 


BB50 

4C 

94 

01 

01 

01 

01 

07 

08 

F3 


BDDO 

CO 

00 

04 

06 

09 

08 

10 

10 

FB 

B8D8 

OF 

08 

19 

39 

OA 

OA 

OC 

18 

A1 


的 58 

10 

10 

00 

00 

00 

80 

EO 

10 

90 


BDDQ 

20 

3F 

20 

60 

BO 

10 

08 

08 

AF 

B8E0 

E8 

08 

40 

42 

23 

FF 

10 

OC 

BO 


BB60 

08 

08 

00 

00 

FF 

80 

80 

80 

8F 


BDEO 

04 

FC 

84 

82 

87 

8C 

BO 

CO 

89 

B8E8 

03 

00 

61 

A1 

22 

A2 

04 

18 

E5 


BB68 

80 

80 

00 

00 

00 

CO 

20 

10 

FO 


BDE8 

00 

00 

20 

CO 

00 

00 

00 

00 

EO 

B8F0 

EO 

00 

94 

82 

9F 

41 

41 

21 

38 


BB70 

10 

IF 

3F 

20 

20 

20 

20 

20 

OE 


BDFO 

00 

00 

02 

02 

01 

00 

00 

00 

05 

BGF8 

19 

07 

21 

41 

FI 

02 

02 

04 

7B 


BB78 

20 

20 

FC 

04 

04 

OA 

04 

04 

50 


BDF8 

00 

00 

40 

40 

80 

00 

80 

80 

80 

SUM ： 

46 

FO 

4C 

67 

BB 

BE 

A1 

3C ： 3F 


SUM ： 

IE 

88 

E2 

CC 

C9 

26 

28 

CE ：39 


SUM ： 

99 

77 

B9 

18 

F3 

AA 

2B 

F9 ：72 

B 900 

18 

EO 

S6 

B5 

44 

45 

20 

18 

C4 


BB80 

04 

04 

00 

00 

00 

03 

04 

OB 

17 


BEOO 

80 

80 

FC 

03 

00 

00 

00 

00 

FF 

B 908 

07 

00 

02 

42 

C4 

FF 

08 

30 

46 


BB88 

08 

18 

00 

00 

FF 

01 

01 

01 

22 


BE08 

00 

00 

21 

41 

Cl 

31 

OD 

03 

64 

B 910 

CO 

00 

01 

01 

02 

01 

07 

08 

D4 


BB90 

01 

01 

21 

26 

28 

29 

2E 

2B 

F3 


BE10 

00 

00 

01 

01 

07 

08 

14 

13 

38 

B91B 

14 

13 

00 

00 

80 

80 

EO 

10 

17 


BB9Q 

2C 

30 

24 

24 

C4 

04 

04 

E4 

54 


BE18 

20 

20 

00 

80 

EO 

10 

28 

C8 

AO 

B920 

28 

C8 

00 

00 

FF 

80 

40 

20 

CF 


BBAO 

14 

OC 

24 

24 

23 

40 

BO 

FF 

4A 


BE20 

04 

04 

00 

00 

BF 

AO 

DO 

28 

5F 

B920 

20 

10 

00 

00 

00 

CO 

20 

50 

60 


BBA8 

00 

00 

9B 

94 

DO 

20 

CO 

00 

DF 


BE28 

28 

14 

00 

00 

CO 

30 

08 

14 

48 

B930 

90 

BC 

30 

28 

26 

21 

20 

20 

FB 


BBBO 

00 

00 

17 

14 

08 

07 

01 

02 

3D 


BE30 

24 

27 

38 

08 

36 

29 

26 

21 

31 

B938 

20 

20 

OC 

14 

64 

84 

04 

04 

50 


BBB8 

01 

01 

08 

08 

10 

EO 

80 

80 

02 


BE38 

20 

20 

1C 

10 

6C 

94 

64 

84 

54 

B940 

04 

04 

00 

00 

00 

03 

04 

OA 

19 


BBCO 

00 

00 

D9 

29 

OB 

04 

03 

00 

14 


BE40 

04 

04 

00 

00 

03 

OC 

10 

28 

4F 

B948 

09 

39 

00 

00 

FF 

01 

02 

04 

48 


BBCS 

00 

00 

24 

24 

C4 

02 

01 

FF 

OE 


BE48 

24 

64 

00 

00 

FD 

05 

OB 

14 

A9 

B950 

04 

08 

01 

01 

01 

01 

07 

08 

IF 


BBDO 

00 

00 

20 

20 

20 

20 

20 

20 

CO 


BE50 

14 

28 

01 

01 

07 

08 

10 

10 

6D 

B958 

14 

13 

00 

00 

00 

80 

EO 

10 

97 


BBDQ 

20 

3F 

04 

04 

04 

04 

04 

04 

77 


BE58 

20 

20 

00 

80 

EO 

10 

08 

OS 

CO 

B 960 

28 

C8 

00 

00 

FF 

80 

40 

20 

CF 


BBEO 

04 

FC 

BO 

80 

BO 

80 

80 

FF 

7F 


BE60 

04 

04 

00 

00 

BF 

AO 

DO 

2B 

5F 

B968 

20 

10 

00 

00 

00 

CO 

20 

50 

60 


BBE8 

00 

00 

18 

10 

10 

20 

CO 

00 

IS 


BE68 

28 

14 

00 

00 

CO 

30 

08 

04 

38 

B970 

90 

9F 

30 

28 

26 

21 

20 

20 

OE 


BBFO 

00 

00 

10 

10 

OB 

07 

01 

00 

30 


BE70 

04 

07 

3B 

08 

36 

29 

26 

21 

FI 

B978 

20 

20 

OC 

14 

64 

84 

04 

04 

50 


BBF8 

00 

00 

08 

08 

10 

EO 

80 

80 

00 


BE78 

20 

20 

1C 

10 

6 C 

94 

64 

84 

54 

SUM ： 

08 

66 

02 

41 

9C 

14 

04 

AE : 13 


SUM ： 

72 

95 

F4 

37 

91 

29 

El 

3B ：08 


SUM ： 

BC 

EE 

C7 

76 

D1 

8C 

40 

E4 :68 

B9B0 

04 

04 

00 

00 

00 

03 

04 

OA 

19 


BCOO 

80 

80 

F8 

08 

08 

04 

03 

00 

OF 


BEBO 

04 

04 

00 

00 

03 

OC 

10 

20 

47 

B9B8 

09 

19 

00 

00 

FF 

01 

02 

04 

28 


BC08 

00 

00 

01 

01 

01 

01 

01 

FF 

04 


BEQ8 

20 

60 

04 

04 

FD 

05 

OB 

14 

A9 

B 990 

04 

OB 

20 

20 

20 

20 

21 

26 

D3 


BC10 

00 

00 

01 

01 

01 

01 

07 

08 

13 


BE90 

14 

28 

20 

20 

21 

26 

29 

36 

22 

B998 

28 

30 

04 

04 

04 

04 

84 

64 

50 


BC18 

14 

13 

00 

00 

00 

80 

EO 

10 

97 


BE98 

OB 

38 

04 

04 

84 

64 

94 

6C 

30 

B9A0 

14 

OC 

10 

20 

20 

40 

80 

FF 

2F 


BG20 

28 

CB 

00 

00 

FF 

80 

80 

80 

6F 


BEAO 

10 

1C 

14 

28 

28 

DO 

AO 

BF 

BF 

B9A8 

00 

00 

8B 

94 

50 

20 

CO 

00 

4F 


BC2B 

80 

BO 

00 

00 

00 

CO 

20 

50 

30 


BEA8 

00 

00 

26 

24 

14 

08 

30 

CO 

56 

B9B0 

00 

00 

13 

14 

08 

07 

01 

02 

39 


BC30 

90 

9F 

3F 

20 

20 

20 

20 

20 

OE 


BEBO 

00 

00 

20 

20 

13 

14 

08 

07 

7 b 

B9B8 

01 

01 

C8 

28 

10 

EO 

80 

80 

E2 


BC38 

20 

20 

FC 

04 

04 

04 

04 

04 

50 


BEB8 

01 

00 

04 

04 

C8 

28 

10 

EO 

E9 

B9C0 

00 

00 

D9 

29 

OA 

04 

03 

00 

13 


BC40 

04 

04 

00 

00 

00 

03 

04 

OA 

19 


BECO 

80 

80 

E4 

24 

28 

10 

OC 

03 

4F 

B9C0 

00 

00 

08 

04 

04 

02 

01 

FF 

12 


BC48 

09 

11 

00 

00 

FF 

01 

01 

01 

1C 


BEC8 

00 

00 

28 

14 

14 

OB 

05 

FD 

5D 

B9D0 

00 

00 

20 

20 

20 

20 

21 

26 

C7 


BC50 

01 

01 

01 

01 

01 

01 

02 

02 

OA 


BEDO 

00 

00 

20 

20 

21 

26 

29 

36 

E6 

B9DB 

28 

30 

04 

04 

04 

04 

84 

64 

50 


BC58 

04 

04 

00 

00 

00 

80 

40 

40 

08 


BED8 

08 

38 

04 

04 

84 

64 

94 

6C 

30 

B9E0 

14 

OC 

10 

20 

20 

40 

80 

FF 

2F 


BC60 

20 

20 

00 

00 

FO 

8C 

A3 

FO 

4F 


BEEO 

10 

1C 

14 

28 

28 

DO 

AO 

BF 

BF 

B9E8 

00 

00 

98 

90 

50 

20 

CO 

00 

58 


BC68 

AO 

80 

00 

00 

00 

00 

00 

CO 

EO 


BEE8 

00 

00 

06 

04 

04 

08 

30 

CO 

06 

B9F0 

00 

00 

13 

14 

08 

07 

01 

00 

37 


BC70 

30 

OF 

3F 

20 

2E 

20 

10 

10 

OC 


BEFC) 

00 

00 

20 

20 

10 

10 

08 

07 

6F 

B9F0 

00 

00 

C8 

28 

10 

EO 

80 

80 

EO 


BC78 

08 

08 

FC 

24 

74 

24 

08 

08 

D8 


BEF8 

01 

00 

04 

04 

08 

08 

10 

EO 

09 

SUM ： 

8A 

9E 

22 

51 

65 

EO 

D6 

21 ： D7 


SUM ： 

F6 

6B 

71 

73 

BF 

3F 

B1 

20 : 14 


SUM ： 

EA 

B4 

F4 

44 

El 

44 

76 

44 : B5 

BA00 

80 

80 

F9 

09 

OA 

04 

03 

00 

13 


BC80 

10 

10 

00 

00 

00 

00 

00 

03 

23 


BFOO 

80 

80 

EO 

20 

20 

10 

OC 

03 

3F 

BA08 

00 

00 

08 

04 

04 

02 

01 

FF 

12 


BG88 

OC 

10 

00 

00 

OF 

31 

C5 

05 

26 


BF08 

00 

00 

28 

14 

14 

OB 

05 

FD 

5D 

BA10 

00 

00 

01 

01 

02 

01 

06 

08 

13 


BC90 

05 

01 

20 

20 

20 

20 

20 

20 

C6 


BF10 

04 

04 

01 

01 

01 

02 

02 

01 

10 

BA18 

10 

10 

00 

00 

80 

80 

60 

10 

90 


BC98 

20 

3F 

04 

04 

04 

04 

04 

04 

77 


BF10 

02 

02 

00 

00 

00 

80 

80 

80 

84 

BA20 

08 

08 

00 

00 

FF 

80 

80 

BO 

8F 


BCAO 

04 

FC 

80 

80 

80 

80 

80 

FF 

7F 


BF20 

40 

40 

00 

00 

CO 

BO 

BC 

83 

FF 

BA28 

80 

80 

00 

00 

00 

CO 

20 

10 

FO 


BCA8 

00 

00 

98 

90 

50 

20 

CO 

00 

58 


BF28 

F8 

A4 

00 

00 

00 

00 

00 

00 

9C 

BA30 

10 

OC 

3F 

20 

20 

20 

20 

20 

FB 


BCBO 

00 

00 

13 

14 

08 

07 

01 

00 

37 


BF30 

D8 

27 

3F 

20 

10 

11 

09 

09 

91 

BA38 

20 

20 

FC 

04 

04 

04 

04 

04 

50 


BCBS 

00 

00 

C8 

28 

10 

EO 

80 

80 

EO 


BF38 

05 

04 

FC 

44 

ca 

48 

50 

90 

39 

BA40 

04 

04 

00 

00 

00 

03 

04 

08 

17 


BCCO 

80 

BO 

F9 

09 

OA 

04 

03 

00 

13 


BF40 

20 

20 

00 

00 

00 

00 

00 

00 

40 

BA48 

08 

38 

00 

00 

FF 

01 

01 

01 

42 


BCC8 

00 

00 

01 

01 

01 

01 

01 

FF 

04 


BF48 

03 

1C 

00 

00 

03 

OD 

31 

Cl 

21 

BA50 

01 

01 

01 

01 

02 

01 

07 

08 

16 


BCDO 

00 

00 

08 

08 

10 

10 

24 

2E 

82 


BF50 

01 

79 

08 

04 

08 

10 

20 

40 

FE 

BA58 

10 

10 

00 

00 

80 

80 

EO 

10 

10 


BCD8 

24 

3F 

10 

10 

08 

08 

04 

74 

OB 


BF58 

20 

10 

00 

00 

00 

00 

00 

00 

30 

BA60 

IB 

78 

00 

00 

FF 

80 

FC 

92 

9D 


B 匚 EO 

04 

FC 

80 

AO 

AO 

A3 

BC 

FO 

DF 


BF 60 

00 

80 

00 

00 

00 

00 

00 

00 

80 

BA68 

92 

89 

00 

00 

00 

CO 

20 

10 

OB 


BCE8 

00 

00 

08 

30 

CO 

00 

00 

00 

FB 


BF68 

00 

01 

10 

20 

10 

08 

04 

02 

4F 

BA70 

10 

1C 

3F 

20 

20 

20 

21 

2E 

1A 


BCFO 

00 

00 

04 

04 

02 

02 

01 

00 

OD 


BF70 

04 

08 

00 

20 

50 

88 

05 

02 

OB 

BA78 

28 

29 

FC 

14 

14 

74 

94 

14 

91 


BCF8 

00 

00 

20 

20 

40 

40 

80 

BO 

CO 


BF78 

02 

07 

00 

20 

50 

88 

05 

02 

08 

SUM ： 

47 

D7 

79 

67 

67 

44 

EB 

DO ：64 


SUM ： 

ED 

17 

D5 

86 

EO 

DE 

E3 

BC 

: BC 


SUM ： 

E5 

EA 

5C 

FD 

88 

DB 

D7 

A4 ：06 

BA80 

64 

84 

00 

00 

00 

03 

04 

08 

F7 


BDOO 

80 

80 

FO 

OC 

03 

00 

00 

00 

FF 


BF80 

00 

00 

00 

00 

00 

00 

60 

00 

00 

BA88 

08 

38 

00 

00 

FF 

01 

3F 

49 

C8 


BD08 

00 

00 

01 

05 

OF 

C5 

31 

OF 

1A 


BF88 

00 

01 

08 

10 

20 

40 

40 

40 

F9 

BA90 

49 

91 

20 

20 

20 

20 

20 

20 

9A 


BD10 

00 

00 

07 

18 

20 

40 

40 

BF 

4E 


BF90 

40 

50 

04 

04 

09 

OA 

12 

13 

DO 

BA98 

20 

3F 

04 

04 

04 

04 

04 

04 

77 


BD18 

82 

84 

EO 

18 

04 

02 

02 

F9 

FF 


BF98 

22 

3F 

20 

AO 

90 

90 

88 

08 

D1 

BAA0 

04 

FC 

80 

80 

80 

80 

80 

FF 

7F 


BD20 

41 

29 

03 

OC 

10 

FF 

20 

40 

EB 


BFAO 

04 

FC 

9E 

BO 

83 

8C 

BO 

CO 

90 

BAAS 

00 

00 

OB 

14 

10 

20 

CO 

00 

OF 


BD2Q 

40 

40 

EO 

18 

04 

22 

A2 

61 

A1 


BFA8 

00 

00 

38 

CO 

00 

00 

00 

00 

F8 

BAB0 

00 

00 

10 

10 

08 

07 

01 

01 

31 


BD30 

21 

21 

10 

17 

18 

30 

50 

50 

51 


BFBO 

00 

00 

02 

02 

01 

01 

01 

00 

07 

BAB8 

00 

00 

08 

08 

10 

EO 

GO 

40 

CO 


BD38 

9C 

98 

10 

FO 

18 

14 

12 

12 

84 


BFBS 

00 

00 

40 

40 

80 

40 

40 

80 

00 

BAC0 

80 

80 

D8 

28 

08 

04 

03 

00 

OF 


BD40 

11 

11 

07 

IB 

20 

44 

44 

85 

6E 


BFCO 

80 

BO 

E4 

IB 

00 

00 

00 

00 

FF 

BAC8 

00 

00 

01 

01 

01 

01 

01 

FF 

04 


BD48 

86 

84 

CO 

30 

08 

7F 

84 

02 

07 


BFC8 

00 

00 

25 

IF 

Cl 

31 

OD 

03 

46 

BAD0 

00 

00 

21 

26 

28 

29 

2E 

28 

EE 


BD50 

02 

02 

01 

01 

01 

01 

01 

01 

OA 


BFDO 

00 

00 

09 

07 

09 

10 

20 

40 

89 

BAD8 

28 

3F 

94 

14 

74 

84 

04 

04 

OF 


BD58 

02 

02 

00 

00 

00 

00 

00 

80 

84 


BFD8 

20 

10 

00 

F8 

04 

83 

00 

00 

AF 

BAE0 

04 

FC 

89 

84 

84 

87 

80 

FF 

97 


BD60 

40 

40 

00 

00 

CO 

BO 

8C 

83 

FF 


BFEO 

00 

00 

00 

IF 

20 

Cl 

00 

00 

00 

BAE8 

00 

00 

IB 

94 

90 

EO 

CO 

00 

DF 


BD68 

82 

84 

00 

00 

00 

00 

00 

00 

06 


BFE8 

00 

00 

90 

EO 

90 

08 

04 

02 

OE 

BAF0 

00 

00 

IE 

18 

08 

07 

01 

02 

48 


BD70 

CO 

3F 

3F 

20 

10 

10 

08 

OD 

93 


BFFO 

04 

08 

OA 

02 

02 

02 

02 

04 

22 

BAF8 

01 

01 

08 

08 

10 

EO 

80 

80 

02 


BD78 

06 

04 

FC 

04 

08 

08 

10 

90 

BA 


BFF8 

08 

08 

80 

00 

00 

00 

00 

00 

90 

SUM ： 

86 

44 

IF 

6B 

9C 

AF 

IF 

61 s IF 


SUM ： 

63 

C6 

DE 

D9 

7B 

F8 

04 

C2 

: 19 


SUM ： 

12 

2C 

70 

70 

3D 

36 

FE 

E4 : 

：73 

BB00 

00 

00 

D8 

29 

09 

07 

03 

00 : 14 


BD80 

60 

20 

00 

00 

00 

00 

00 

00 

:80 


COOO 

00 

00 

00 

00 

40 

AO 

11 

OA : 

: FB 

BB0Q 

00 

00 

91 

21 

21 

El 

01 

FF : B4 


BD8Q 

03 

04 

00 

00 

03 

OD 

31 

El 

:29 


C008 

04 

00 

EO 

40 

40 

AO 

11 

OA : IF 

BB10 

00 

00 

01 

01 

02 

01 

07 

08 : 14 


BD90 

41 

21 

88 

88 

48 

48 

28 

1 日 

：42 


C010 

04 

00 

00 

00 

00 

EF 

11 

2A ： 2E 


►私の妻のお父さん（つまり義父 > が， Xlturbo または turboll を買うので，今の XI を譲っ 
てもいいと先日，電話をくれました。それで私は今，非常に悩んでいるのです。私は現在 
MZ -1500 を持っているのですが，我家は妻の方針で 1 ■一家に一台 j しかパソコンを置い 
てはいけないのです。 XI を選ぶとなると， MZ -1500 は他の人に报らないといけないし， 


188 Oh! MZ 1986.1. 


































C380 
C388 
C 390 
C398 
C3A0 
C3A8 
C3B0 
C3B8 
C3C0 
C3C8 
C3D0 
C3D8 
C3EC> 
C3E8 
C3F0 
C3FS 


CA00 04 
CA08 08 
CA1010 
CA18 OS 
CA20 OC 
CA28 3E 
CA30 24 
CA3810 
匚 A40 3E 
CA48 3C 
CA50 OC 
CA58 00 
CA6010 
CA68 08 
CA70 08 
CA78 3E 


SUM： 6C 6C A2 A8 DE AO 38 6E 


(C 180 〜 C I FF は 00 で埋めてください） 

C200 00 00 00 00 00 00 00 00 
C208 00 00 00 00 00 00 00 00 
C210 00 00 00 00 0106 09 F6 
C218 08 38 00 00 80 60 90 6F 
C220 10 1C 20 20 2126 29 F6 
C228 08 38 04 04 84 64 94 6F 
C230 10 1C 00 00 00 00 0106 
C23S 08 F0 00 00 00 00 80 60 
C240 10 OF 20 20 20 20 2126 
C248 28 FO 04 04 04 04 84 64 
C 250 14 OF 00 00 00 00 00 00 
C25 日 00 FF 00 00 00 00 00 00 
C260 00 FF 20 20 20 20 20 20 
C26S 20 FF 04 04 04 04 04 04 
C270 04 FF 00 00 00 00 00 00 
C278 00 00 00 00 00 00 00 00 


SUM： A8 A2 6C 6C 6E 38 AO DE 


(C 280 〜 C 37 F は 00 で埋めてください） 


SUM： B3 日 C 00 50 52 8B F7 Cl 


( C 680~ C 7 FF は00で埋めてください） 


C 800 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C808 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C810 

00 

00 

00 

18 

24 

42 

7E 

42 

3E 

C818 

42 

42 

00 

7C 

22 

22 

3C 

22 

A2 

C 820 

22 

7C 

00 

1C 

22 

40 

40 

40 

9C 

C828 

22 

1C 

00 

78 

24 

22 

22 

22 

40 

C830 

24 

78 

00 

7E 

40 

40 

78 

40 

52 

C83B 

40 

7E 

00 

7E 

40 

40 

78 

40 

74 

C840 

40 

40 

00 

1C 

22 

40 

4E 

42 

8 E 

C84 日 

22 

1C 

00 

42 

42 

42 

7E 

42 

C4 

C850 

42 

42 

00 

1C 

08 

08 

08 

08 

CO 

C858 

08 

1C 

00 

OE 

04 

04 

04 

04 

42 

C 860 

44 

38 

00 

42 

44 

48 

70 

48 

02 

C868 

44 

42 

00 

40 

40 

40 

40 

40 

C6 

C870 

40 

7E 

00 

42 

66 

5A 

5A 

42 

5C 

C878 

42 

42 

00 

42 

62 

52 

4A 

46 

OA 

SUM ： 

AO 

C4 

00 

B2 

C8 

08 

38 

E6 ：04 

C880 

42 

42 

00 

18 

24 

42 

42 

42 

86 

C888 

24 

18 

00 

7C 

42 

42 

7C 

40 

F8 

C 890 

40 

40 

00 

18 

24 

42 

42 

4A 

8 A 

C898 

24 

1A 

00 

フ C 

42 

42 

7C 

48 

02 

C8A0 

44 

42 

00 

3C 

42 

40 

3C 

02 

82 

C8A8 

42 

3C 

00 

3E 

08 

08 

08 

08 

DC 

C8B0 

08 

08 

00 

42 

42 

42 

42 

42 

5A 

C8B8 

42 

3C 

00 

42 

42 

42 

24 

24 

8 C 

C8C0 

18 

18 

00 

42 

42 

42 

5A 

5A 

AA 

C8C8 

66 

42 

00 

42 

42 

24 

18 

24 

8 C 

CSDO 

42 

42 

00 

22 

22 

22 

1C 

08 

OE 

C8D8 

08 

08 

00 

7E 

02 

04 

18 

20 

CC 

C8E0 

40 

7E 

00 

00 

00 

38 

04 

3C 

36 

C8E8 

44 

3A 

00 

40 

40 

5C 

62 

42 

FE 

C8F0 

62 

5C 

00 

00 

00 

3C 

42 

40 

7C 

C8F8 

42 

3C 

00 

02 

02 

3A 

46 

42 

44 

SUM ： 

8 A 

6 A 

00 

8 C 

B4 

6 A 

BA 

2A ：52 

C 900 

46 

3A 

00 

00 

00 

3C 

42 

7E 

7C 

C908 

40 

3C 

00 

OC 

12 

10 

7C 

10 

36 

C 910 

10 

10 

00 

00 

3A 

46 

46 

3A 

20 

C918 

02 

3C 

00 

40 

40 

5C 

62 

42 

BE 

C920 

42 

42 

00 

08 

00 

18 

08 

08 

B4 

C928 

08 

1C 

04 

00 

OC 

04 

04 

04 

40 

C930 

44 

38 

00 

40 

40 

44 

48 

50 

D8 

C938 

68 

44 

00 

18 

08 

08 

08 

09 

E4 

C940 

08 

1C 

00 

00 

00 

76 

49 

49 

2C 

C948 

49 

49 

00 

00 

00 

5C 

62 

42 

92 

C950 

42 

42 

00 

00 

00 

3C 

42 

42 

44 

C958 

42 

3C 

00 

00 

5C 

62 

62 

5C 

FA 

C 960 

40 

40 

00 

00 

3A 

46 

46 

3A 

80 

C968 

02 

02 

00 

00 

00 

5C 

62 

40 

02 

C970 

40 

40 

00 

00 

00 

3E 

40 

3C 

3A 

C978 

02 

7C 

00 

10 

10 

7C 

10 

10 

3A 

SUM ： 

E7 

7D 

04 

BC 

Q 6 

22 

09 

5D ：32 

C9B0 

12 

OC 

00 

00 

00 

42 

42 

42 

E4 

C988 

42 

3C 

00 

00 

00 

42 

42 

42 

44 

C990 

24 

18 

00 

00 

00 

41 

49 

49 

OF 

C998 

49 

36 

00 

00 

00 

44 

20 

10 

FB 

C9A0 

28 

44 

00 

00 

42 

42 

46 

3A 

70 

C9A8 

02 

3C 

00 

00 

00 

7E 

04 

IQ 

D8 

C9B0 

20 

7E 

00 

3C 

42 

42 

42 

42 

E2 

C9B8 

42 

3C 

00 

08 

18 

28 

08 

08 

D6 

C9C0 

OB 

3E 

00 

3C 

42 

02 

OC 

30 

02 

C9C8 

40 

7E 

00 

3C 

42 

02 

3C 

02 

7C 

C9D0 

42 

3C 

00 

04 

OC 

14 

24 

7E 

44 

C9D8 

04 

04 

00 

7E 

40 

78 

04 

02 

44 

C9E0 

44 

38 

00 

1C 

20 

40 

7C 

42 

B6 

C9E8 

42 

3C 

00 

7E 

42 

04 

08 

10 

5A 

C9F0 

10 

10 

00 

3C 

42 

42 

3C 

42 

5E 


C9F8 42 3C 00 3C 42 42 3E 02 


24 

C0 
5C 
5C 
72 
5A 
A0 
98 
34 
BE 
92 
28 
66 
66 
98 
66 
匚8 


46 


00 

00 

A8 

0C 

78 

F8 

BA 

54 

70 

4E 

40 

20 

35 

70 

9F 

C0 


46 


00 

00 

06 

1F 

D2 

33 

33 

D8 

E6 

10 

23 

FF 

BF 

37 

03 

00 


SUM： C7 2F 28 30 02 C3 87 BA ：54 


C018 2A 1100 00 00 EF 10 A0 : E2 
C020 A8 10 00 IF 10 F31C IF : 15 
C028 00 00 00 FO 70 9F 10 FO ：FF 
C030 00 0010 28 44 82 0100 : FF 
C038 00 0010 28 44 82 0100 ：FF 
C040 00 00 00 02 02 FE 03 2E ：33 
C048 3010 00 4C 70 FF 40 40 ： 7B 
COSO 00 00 00 00 00 00 00 01：01 
C058 OF 09 081410 20 40 48 ： F4 
C060 94 08 0814 OC 02 0109 ：DO 
C06814 08 00 00 00 00 00 40 ： 5C 
0070 FB 48 05 05 05 FD 05 05 ：56 
C078 05 00 DO 50 50 5F 50 50 ：74 


SUM ： BE 92 E5 6A 73 2F 4A 4A : D5 

C080 DO 00 00 00 00 00 00 00 sDO 

匚 088 00 00 00 00 00 00 00 00 s00 

C090 00 00 00 00 00 Oo 00 00 SOO 

C098 00 00 00 00 00 00 00 00 :00 

COAO 00 00 00 00 00 00 00 00 :oo 

C0A8 00 00 00 00 00 00 00 00 :〇〇 

COBO 00 00 00 00 00 00 00 00 ：00 

C0B8 00 00 00 00 00 00 00 00 :〇〇 

COCO 00 00 00 00 00 00 00 00 SOO 

coca oo oo oo 〇〇 〇〇 〇〇 〇〇 〇〇 :〇〇 

CODO 00 00 00 00 00 00 00 00 :〇〇 

C0D8 00 00 00 00 00 00 00 〇〇 :〇〇 

COEO 00 00 00 00 00 00 00 〇〇 :〇〇 

C0E8 00 00 00 00 00 00 00 00 :〇〇 

COFO 00 00 00 00 00 〇〇 00 〇〇 :〇〇 

C0F8 00 00 00 00 00 00 00 00 :〇〇 


SUM： DO 00 00 00 00 00 〇〇 〇〇 sDO 

Cl00 00 00 00 00 00 00 00 00 :〇〇 
C108 00 00 00 00 00 00 00 00 :〇〇 
0110 00 00 38 08 F 6 09 06 01：46 
Cl18 00 001C 10 6F 90 60 80 ： 0B 
C120 00 00 38 08 F6 29 26 21 : A6 
C128 20 201C 10 6F 94 64 84 ：57 
C130 04 04 FO 08 06 0100 00 ：07 
C138 00 00 OF 10 60 80 00 00 : FF 
C140 00 00 FO 2B 26 2120 20 ： 9F 
C148 20 20 OF 14 64 84 04 04 ：53 
C150 04 04 FF 00 00 00 00 〇〇 :07 
C158 00 00 FF 00 00 00 00 00 : FF 
Cl60 00 00 FF 20 20 20 20 20 ： 9F 
C168 20 20 FF 04 04 04 04 04 ：53 
C170 04 04 00 00 00 00 00 00 ：08 
C178 00 00 00 00 00 00 00 00 :〇〇 


C408 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C410 

00 

00 

08 

10 

20 

40 

20 

10 

A 日 

C418 

08 

04 

00 

00 

00 

00 

00 

00 

OC 

C420 

00 

00 

68 

08 

68 

90 

68 

08 

D 日 

C428 

08 

08 

00 

00 

00 

00 

00 

00 

10 

C430 

00 

00 

2A 

26 

26 

3E 

08 

08 

C4 

C438 

08 

oa 

00 

00 

00 

00 

00 

00 

10 

C440 

00 

00 

08 

3E 

OC 

OC 

OA 

OA 

72 

C448 

08 

08 

00 

00 

00 

00 

00 

00 

10 

C450 

00 

00 

40 

30 

08 

46 

A5 

42 

A5 

C45S 

00 

00 

00 

00 

00 

00 

ocf 

00 

00 

C460 

00 

00 

EO 

40 

40 

CO 

00 

00 

20 

C468 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C470 

00 

00 

7F 

00 

7F 

08 

08 

08 

16 

C478 

08 

08 

00 

00 

00 

00 

00 

00 

10 

SUM! 

28 

24 

41 

EC 

81 

28 

47 

74 : DD 

C480 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C488 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C 490 

00 

00 

20 

20 

BF 

AO 

DO 

28 

97 

C498 

28 

14 

00 

00 

00 

00 

00 

00 

3C 

C4A0 

00 

00 

04 

04 

FD 

05 

OB 

14 

29 

C4A8 

14 

28 

00 

00 

00 

00 

00 

00 

3C 

C4B0 

00 

00 

80 

80 

FF 

BO 

40 

20 

DF 

C4B8 

20 

10 

00 

00 

00 

00 

00 

00 

30 

匚 4C0 

00 

00 

01 

01 

FF 

01 

02 

04 

08 

C4C8 

04 

08 

00 

00 

00 

00 

00 

00 

OC 

C4D0 

00 

00 

80 

80 

FF 

80 

80 

80 

7F 

C4D8 

80 

BO 

00 

00 

00 

00 

00 

00 

00 

C4E0 

00 

00 

01 

01 

FF 

01 

01 

01 

04 

C4E8 

01 

01 

00 

00 

00 

00 

00 

00 

02 

C4F0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C4F8 

00 

OO 

00 

00 

00 

00 

00 

00 

00 

SUM ： 

El 

D5 

26 

26 

B8 

A フ 

9E 

El : EO 

C 500 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C508 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C510 

00 

00 

14 

28 

28 

DO 

AO 

BF 

93 

C518 

20 

20 

00 

00 

00 

00 

00 

00 

40 

C520 

00 

00 

28 

14 

14 

OB 

05 

FD 

5D 

C528 

04 

04 

00 

00 

00 

00 

00 

00 

08 

C 530 

00 

00 

10 

20 

20 

40 

80 

FF 

OF 

C538 

80 

80 

00 

00 

00 

00 

00 

00 

00 

C 540 

00 

00 

08 

04 

04 

02 

01 

FF 

12 

C548 

01 

01 

00 

00 

00 

00 

00 

00 

02 

C550 

00 

00 

80 

80 

80 

80 

80 

FF 

7F 

C558 

80 

BO 

00 

00 

00 

00 

00 

00 

00 

C 560 

00 

00 

01 

01 

01 

01 

01 

FF 

04 

C56S 

01 

01 

00 

00 

00 

00 

00 

00 

02 

C570 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C578 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM ： 

26 

26 

D5 

El 

El 

9E 

A7 

B8 : EO 

C580 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C588 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C 590 

00 

00 

20 

20 

AO 

AO 

DO 

28 

78 

C598 

28 

14 

00 

00 

00 

00 

00 

00 

3C 

C5A0 

00 

00 

04 

04 

05 

05 

OB 

14 

31 

C5A8 

14 

28 

00 

00 

00 

00 

00 

00 

3C 

C5B0 

00 

00 

80 

SO 

80 

80 

40 

20 

60 

C5BS 

20 

10 

00 

00 

00 

00 

00 

00 

30 

C5C0 

00 

00 

01 

01 

01 

01 

02 

04 

OA 

C5C8 

04 

OS 

00 

00 

00 

00 

00 

00 

OC 

CSDO 

00 

00 

BO 

BO 

80 

80 

80 

80 

00 

C5D8 

80 

80 

00 

00 

00 

00 

00 

00 

00 

C5E0 

00 

00 

01 

01 

01 

01 

01 

01 

06 

C5E8 

01 

01 

00 

00 

00 

00 

00 

00 

02 

C5F0 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C5F8 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM ： 

El 

D5 

26 

26 

A7 

A7 

9E 

El：CF 

C 600 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C608 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C 610 

00 

00 

14 

28 

28 

DO 

AO 

AO 

74 

C618 

20 

20 

00 

00 

00 

00 

00 

00 

40 

C620 

00 

00 

28 

14 

14 

OB 

05 

05 

65 

C628 

04 

04 

00 

00 

00 

00 

00 

00 

08 

C630 

00 

00 

10 

20 

20 

40 

80 

80 

90 

C63S 

80 

80 

00 

00 

00 

00 

00 

00 

00 

C 640 

00 

00 

08 

04 

04 

02 

01 

01 

14 

C648 

01 

01 

00 

00 

00 

00 

00 

00 

02 

C650 

00 

00 

80 

80 

80 

80 

80 

80 

00 

C658 

80 

80 

00 

00 

00 

00 

00 

00 

00 

C 660 

00 

00 

01 

01 

01 

01 

01 

01 

06 

C668 

01 

01 

00 

00 

00 

00 

00 

00 

02 

C 670 

00 

00 

00 

00 

00 

00 

00 

00 

00 

C67G 

00 

00 

00 

00 

00 

00 

00 

00 

00 

SUM ： 

26 

26 

D5 

El 

El 

9E 

A7 

A7 ：CF 


000080 2 080008 000 
001000 3 0204 0 0000 

000080 2 080006 OFO 
o o 2 0 6 0 3 o c 040 4 o 7 o 

000000 Eo 8000 5 0 80 
00409 0 3 040 COAOOO 

000080808000 2 0 80 
0 0 2 0 6 0 0 0 2 0 0 0 4 0 0 0 

0000808080000080 
0010000000000 0 00 

0080808080000080 

0000000000000000 

0004000 Aoooooool 
0000090 2 010E0404 

0 008080 AOEOOOOOF 
0 0 0 0 0 6 0 2 0 3 0 4 0 3 0 7 


4882844442088484 
00200110000 00 0 02 

2C828C2 4CAO 88284 
0 0 12 0 0 10 3 2 0 0 2 0 0 1 

E 2 BEEEEC4ACC 8 2 8 c 
3 0 0 3 3 3 3 10 2 10 12 0 0 

2 E 480400 COOA8284 
0 3 0 0 0 0 10 3 0 0 0 0 2 0 0 

Eooooooo 00024 eee 

3 0 0 0 0 0 0 0 0 0 0 0 0 3 3 3 

0000000 OOOOE 2 804 
00000 0 00000300 00 

日000000000000000 
3000000000000000 


といって MZ -1500 を選ぶと義父の好意をムダにしたうえに， XI の豊富なソフトの魅力も 
捨てなければならないし……。1月号が発売されるまでにこの返事を出さなければならな 
い，こまったもんだ。 細田茂（27> 神奈川県 


The 部品箱 189 



































C6AC) 

C6A8 

C6B0 

C6B8 

C6C0 

C6C8 

C6D0 

C6D8 

C6E0 

C6E8 

C6F0 

C6F8 


CA80 

CA88 

CA90 

CA98 

CAAO 

CAA8 

CABO 

CAB8 

CACO 

CAC8 

CADO 

CAD8 

CAEO 

CAE8 

CAFO 

CAF8 


3E 12121212 
3E 08 3E 08 08 
IE 12 22 02 04 
IE 24 04 04 04 
3E 02 02 02 02 
3E 1414 04 08 
30 02 32 02 04 
3E 02 04 0814 
3E 12141010 
22 2212 02 04 
3C 24 54 OC 08 
38 08 3E OS 08 
2A 2A 2A 02 04 
00 3E 08 08 08 
1010181410 
08 3E 08 0810 


SUM ： FB 33 F5 84 AG BC 40 5C sA7 

C700 FD 16 00 3A F5 CF 3D 5F : AD 
C70819 C9 F3 3E 02 D3 E511 : DE 
C710 00 20 2100 DO 3E 00 3E ： 8D 
C718 00 77 23IB 7A B3 20 F7 ： F9 
C720 D3 E6 D9 213C 00113C ： 3C 
C728 00 D9 216F E7 06 64 OE : C8 
C730 3C 23 7E CB 5F D9 28 04 :OC 
C738 3E 01 DF 4813 D9 05 28 ： 7F 


SUM ： 86 38 4C FE DC 00 26 BO 


C740 0418 EE 18 08 06 64 D9 :6D 
C74S 23113C 00 D9 OD 20 El:57 
C750 C9 AF DF OD 32 F4 CF C9 ：22 
C758 219D CB 0610 OE 1011 : CE 
C76018 00 3A F3 CF 77 23 05 : B3 
C768 20 F8 OD 28 0519 0610 :81 
C77018 FO 21 DD C7 0610 OE : FI 
C778101118 00 AF 77 23 3C : BE 


SUM ： D4 C7 E2 59 43 6D A3 OE ：37 

C 780 05 20 FA OD 28 0519 06 ：78 
C7881018 F2 C3 C2 C611 EO ：56 
C 790 2E 21 00 DO AF 77 23IB ：83 
匚 798 7A B3 20 F8 C9 62 6B 7E ：59 
C7A0 23 CD A7 C710 F9 C9 OE : 3E 
C7A8 00 57 CD BD C7 7A D3 FF ： F4 
C7B0 3E 80 D3 FE OE 01 CD BD ： 28 
C7B8 C7 AF D3 FE C9 DB FE E6 : CF 
C7C0 OD B9 C818 F8 00 00 00 :9E 


SUM ： F218 EE 30 08 F3IF 2F ：71 


SUM: 86 00 84 B8 80 CC 7C 94 : IE 


CBOO 

CB08 

CB10 

CB1Q 

CB20 

CB28 

CB30 

CB38 

CB40 

CB48 

CB50 

CB58 

CB60 

CB68 

CB70 

CB78 


20 00 
3E 00 
20 00 
08 00 
10 00 
22 00 
IE 00 
18 00 
00 00 
08 00 
04 00 
02 00 
02 00 
20 00 
OE 00 
10 00 


001C 
00 3E 
08 3E 
04 04 
00 08 
20 20 
00 3E 
0010 
08 3E 
00 3E 
001C 
00 08 
00 02 
00 3E 
1010 
001C 


00 00 
0214 
04 08 
04 04 
04 22 
3E 20 
02 02 
28 04 
08 08 
02 02 
001C 
10 20 
02 t4 
10 3E 
3E 12 
04 04 


00 00 
0814 
1C 2A 
04 08 
22 22 
20 20 
02 04 
02 02 
2A 2A 
14 08 
00 3C 
22 3E 
0814 
1010 
1410 
04 04 


3C 
AE 
B 日 
24 
B2 
00 
66 
58 
AA 
66 
78 
9A 
36 
CC 
A2 
3C 


SUM ： 3C 00 44IE E416 FE 72 ：08 


CBBO 

CBG8 

CB90 

CB98 

CBAO 

CBAQ 

CBBO 

CBBQ 

CBCO 

CBC8 

CBDO 

CBD8 

CBEO 

CBE8 

CBFO 

CBF8 


3E 00 
3E 00 
OB 00 
10 00 
2C 00 
30 00 
3E 00 
08 00 
38 00 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 


00 3E 
1C 00 
24 24 
00 08 
00 20 
00 3E 
00 3E 
00 30 
10 48 
70 50 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 


02 3E 
3E 02 
24 24 
28 28 
20 22 
22 22 
22 22 
00 02 
20 00 
70 00 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 


02 02 
02 04 
04 08 
2A 2A 
24 28 
22 22 
02 04 
02 04 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 
00 00 


CO 

AO 

A4 

BC 

DA 

F6 

C6 

40 

BO 

30 

00 

00 

00 

00 

00 

00 


SUM ： 6E 00 CO CE 80 F4 7C 8A s76 

CCOO 00 00 00 00 00 00 00 00 :〇〇 

CC08 00 00 00 00 00 00 00 oo ：oo 

CC10 00 00 〇〇 〇〇 〇〇 〇〇 00 3E ： 3E 


C 600 C3 
C608 C6 
C610 51 
C618 C3 
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連載 7 回目をむかえ，最終回となりました。部品 
化のプログラムを交え，その他のちょっとした付属 
プログラムを紹介しましょう。 


平面的に入力した図が3次元の図に出力 
するこのシリーズは，大仰にも“ マルチ” と 
いう形容詞がついています。たかだかワイ 
ヤーフレームやソリツドモデルの透視図を 
出力するのに省入力化したに過ぎないと思 
っておられる方もいるでしょう。確かに今 
まで紹介した内容の範囲は， プレゼン テ ー 
シヨン（表現）用の道具の範囲で，まだ真 
のマルチには ほど遠いものかもしれません。 
CAD という略語も，ものの表現にとどまら 
ない意味があります。 

今回紹介する「部品化のプログラム」や 
「通信用のプログラム」は，そのマルチ化の 
入口として考えているものです力 5 ',さらに 
向上を望むならば，データベースとして穑 
種の計算や，構造上あるいは機能上のシミ 
ュレーシヨンチェックが必要となるところ 
かもしれません。しかし，ここから先にな 
ると分野や利用方法によってさまざま，特 
殊化の道に入らねばならないことでしょう。 
要は，いかにあなた好みにできるかなのだ 
と思います力す，ここから先は，ご自身のエ 
夫を期待し，真のマルチ CAD にふくらませ 
ていただければと望んでいます。 

そんな参考として，今回の「部品化プロ 
グラム j を位置付けてほしいと考えている 
のですが . 。 


リスト1力 5 '，マルチ CAD で作図したも 
のを部品化し，登録•呼び出しを行えるプ 
ログラムです。このリストは8月号に載つ 
た入力作図用プログラム “ MAIN - JOB ” 


( MAIN - JOB は，リスト3の改造をしてく 
ださい） MERGE してできるようになって 
います。したがって，このリストを入力し 
たら アスキー 形式で セーブ （ファイル名の 
後に， A をつける）し， “ MAIN - JOB ” を口 
ードしてから，このファイルを MERGE の 
?マンドで呼び出すと，部品化のプログラ 
ムはできあがります0このファイル名は， 
何でもかまいませんが，9月号の“ JOB 
SELECT ” と整合させれは…トクシュニュ 
ウリョク”となります。 

さてこの操作方法は8月号の入カプログ 
ラムと同様ですので，新しく加わった機能 
のみ説明しましょう。新しい機能は画面右 
イ則に PLO . (部品呼び出し）， PSA . (部品 
登録)，テイセイの3つが加わっただけです 
ので簡単です。これ以外は入力用のプログ 
ラムと同様ですので，絵を描く機能ももち 
ろんあります。登録したい部品の入力はこ 
の部品用プログラムでも8月号の入力用プ 
ログラムでも，あるいは既存データファイ 
ル呼び出しでもかまいません。 

さて，操作は部品にしたい図が入力され 
たら カーソルを 「 PSA . 」の欄にもってい 
き指定すると，画面下に位置指定の表示 
がでます。そこで，登録したい図の範囲に 
カーソル 田を移動させ，左上，右下の順 
に指定します（この範囲は，少し広めにと 
っておいてください）。すると，既存データ 
の ファイルが 表示され， ファイル 名記入の入 
力待ちになります 0 ファイル 名は，入力さ 
れた名の前に必ず 「 P-J がつ 〈ようになっ 
ています0 ファイル 名を入力すると計算が 
始まり，しばらくするとデータ ファイルに 
登録され，入力した図が消えます。これで 


登録は完了し，その他の入力待ちになりま 
す（図1〜2 )。部品の呼び出しは PLO •を 
指定し，操作手順は登録と同様，記入した 
い位置の範囲を指定し，データファイル名 
を入力します。部品のデータファイルは必 
ず 「 P -」 が頭についていますので， 「 P - J つ 
きのファイル名となります0ファイル名を 
入力すると，ロードに続いて計算が始まり， 
指定した位置と範囲に作図され(図3)，次 
の入力待ちとなります。呼び出されて記入 
された図の奥行きの倍率 （3 次元に起こす 
ためのもの一8月号，9月号参照）は，（部 
品登録時の倍率 ） x (呼び出し時に指定さ 
れている倍率）となっていますので，3次 
元に起こしたい図であれば，部品を呼び出 
す前に，適切な奥行設定 （F 8キー）をし 
ておくほうが良いでしよう（図4〜5 )。 

図 1 部品登録 
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図 2 登録 
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図 3 呼び出し合成 
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図5 ソリッド•パース出力 


さて，これらの部品機能は単によく使う 
図を，熟語的に使えるだけでなく，違うス 
ケールのものを呼び出し合成することにも 
使えますので結構便利だと思います。室内 
のレイアウトであれば，家具などの部品登 
録といった使われ方がすぐ思い浮かぶとこ 
ろでしょう。 

3つ目の機能「テイセイ」は，図の中で不 
要部分がある場合，その指定範囲をカーソ 
ルで左上，右下の対角線位置に指定すると， 
その部分の作図データを削除する機能です。 
これが実行されると，指定された部分を除 
いてデータがソートされ，図も削除された 
ものが出力されます。2つ以上の作図要素 
(線など）を一度に指定してもすべてが削除 
されないことがありますので，その場合は 
再度「テイセイ」を呼び，残された削除部 
分を指定してください。この削除機能は， 
作図 コマンド にある 「 DEL 」 に比べると任 
意のものが消去できますので便利に使える 
のではないでしょうか。 

以上がこの部品化プログラムの説明です 


が，このプログラムファイルはファイル名 
のごとく，いろいろな工夫が付け加えられ 
るように用意しようと思ったものです。 

デジタイザがつながるような機能をつけ 
るとか，図を回転させたデータに変換する 
機能とかいろいろあると思います。貴方自 
身の工夫も施してみてください。 

その他のプロクラムファイル 

今までいろいろなプログラムファイルを 
紹介しましたが， 3 D 出力した図をカラー 
プリンタに出力するとか，グラフィック画 
面自体をセーブするとか，まだメニューの 
中にあって紹介していないものが残ってい 
ます。しかし，これらは，いずれも短く， 
内容も簡単なもの。紹介するまでもないか 
と思います。 

リスト2も，そんな中のひとつであり， 
データ交信という意義にかこつけた付属フ 
ァイルです 0 これは， Xlturbo 用ですが， 
違う機種間でのデータのやりとりや，離れ 
たところのデータ交信に役立てばという願 
いから作ったもので，参考までにとあえて 
紹介しました。操作方法は両機種の送受信 
タイミングを合わせるくらいといったとこ 
ろでしようか。 

ゲーム •ビジネス論 

いよいよエンデイング，ここは ビシッ と 
決めたいところ。さて，どうなることやら！ 

さて， パソコン 雑誌のおおかたは，ホビ 
一（ゲーム）とビジネスに区分されていま 
す0多分便宜的な区分だと思いますが，パ 
ソコンは 確実にビジネスの戦力として歩ん 
でいるようです。人間を管理したり，脅か 
しに パソコン が使われるのを危惧し， 「パソ 
コンは， ゲームにとどまって いる ほうがまし 
だ」という意見があります。端的にとらえ 
ている言葉とは思いますが，こう言ったと 
ころで確実にビジネス ユースは 進んでおり， 
犬の遠吠えとして無視されかねません。や 
はり，もう一歩踏み出したビジョンが欲し 
いのではないでしようか。 

ビジネスとされている分野もどこかにゲ 
ーム的な要素を持っているのではないでし 
ょうか。事業を起こすことは，ある意味で 
バクチにたとえられます。建築の設計も建 
物と人間をあれこれ考えるゲームととらえ 
ることもできるでしよう。またここに紹介し 


た 3 D マルチ CAD は，遊びとしての利用もあ 
るはずです。今の世は，遊びが仕事を生む， 
あるいは，芸術家のように遊び的なものを 
仕事としている入もいます。これからの仕 
事は創造性を求められることが多くなるで 
しょうから，遊びの要素はもっと拡大して 
いくかもしれません。ひょっとしたら，ゲ 
ームとビジネスの違いはなくなってしまう 
のかもしれません。 

新聞で，人生のゲームを 3 分類した記事 
を見たことがあります0確か，パワー（力）， 
ゲーム，ウエル（富）ゲーム，ノリツジ（知） 
ゲームに分類した内容だったと憶えていま 
す0もしも「力のゲーム J が，柔道や野球 
のようなスポーツであれば，自らを磨〈素 
晴しいゲームですが，権力の争奪や，一般 
市民をまきこむ戦争ならば，問題は大きい 
でしょう。 

「富のゲーム」は，自らそして子孫も含め 
た社会資本の蓄積に役立つものであればあ 
りがたいのですが，詐欺もどきの マネー ゲ 
ームではいただけません。かたや「知のゲ 
—ム」が，真理を見つめようとする目的や， 
自らを探る目的であれば，素晴しいことだ 
と思います力、他人を辱めたり，陥れるな 
らば，罪なものと思います。 

現実には，ビジネスと称されているもの 
にはいろいろな要素がからんでくるので， 
この 3 分類 X 2 分類では，単純には区分で 
きないかもしれません。特に善悪の評価な 
どなかなかつけにくいものでしょう。良か 
れと思って行動したことが，裏目に出るこ 
とだってあるのですから。しかし，事前に 
心がけを，事後に反省を行うことぐらいは 
できそうです。 

余談ですが，ビジネスという言葉は ， b 
usy (忙しい）と名詞化する ness 力す，活用 
変化されたつづり busi - ness でできていま 
す。一般的に，仕事は忙しい方が良いとさ 
れています力 ? ，この“忙”という文字は， 
十と亡が組み合わさっています。十は，心 
を意味しますから，「心を亡くす」あるいは 
「亡くす心」となります。とすると，先人の 
意味した「忙」とは，どうも良い言葉では 
なさそうです。世の中，ビジネスと称した 
悪の所業が結構はびこっているように思え 
ますが「忙」という文字を作った真意は， 
こうしたことを見込んだことにあるのでし 
ようか？ 
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八一卜•ゲーム 

他人と差をつけたいと思う消費者の心理 
をくすぐる商品が，徐々に多くなっている 
昨今かと思います。デザインがもてはやさ 
れるのは，こうした風潮も手伝っているの 
でしょう。他人より目立ちたい，立派に見 
せたい，笑われたくないがためのデザイン 
を選ぶ。これが新たな商品を呼び，エスカ 
レートさせていく——こんな構図も頭に浮 
かんできます。 

また，より刺激的なものを求める心がよ 
り刺激的なものを生み出していく，こんな 
構図も浮かぶでしょう。ここには，提供す 
る側も，される側にも誘惑があります。 

デザインをこの構図の中に位置づける人 
がいるかもしれません。し力、し，一方では 
デザインを「本質の設計を求めること」と， 
とらえようとする考えもあります。よりよ 
いデザインとは，「デザインしたものがとり 
立てて目立ってはいけない」，「飾り立てて 
はいけない」という考えです。「本質を求め 
る」というのは，自らの理解の浅さや矛盾 
をはらんでいますから，もちろんデザイン 
されたものが本質にはならないでしょう。 
しかしそうした目を養う，あるいは作ろう 
とする心がけはできるかもしれません。 

さて，話は何やら抽象的になってきまし 
た力 5 '，最後ということもあって肩に力がは 
いり過ぎてしまったのでしょう。 

世の変化は激しく，先は読めなくどこに 


価値を置いていいかわからない昨今，ビジ 
ネスゲームに明け暮れるのが精一杯といっ 
た感もありますが，せめて心がけだけでも 
燃やし続けられる大きな目標を持ちたいと 
思います。 

突然で笑われるかもしれませんが，近頃 
その指標として，愛があるか，積み上げが 
ある行為かを考えてみてはと思っています。 
(実は，私の長女は「愛」，次女は土を積み 
上げる意味で「圭 J と名付けたこじつけも 
あったりしているのですが……)〇 

パソコンと接して始まることは，自らの 
プログラミングの旅だと思います。そこに 
は，当面，何をさせるか自ら決め，自ら築 
いていかねばならぬ厳しさがあります。 

特に難しいのは，何をさせるかで，特に 
問われるのは，そのはるか向こうに何を願 
うかでしょう。あるいは，その人の立脚点 
かもしれません。もう，ここまで考えると， 
自らの生き方にあるのかもしれませんね。 
人生のプロダラミングを語る資格はありま 
せんが，どこか人とのふれ合いも，そのプ 
ログラミングのソースとしてあるような気 
がしてきます。 

_おわりに_ 

連載の終盤は，かっこ良く決めてやろう 
と力んでみたものの，筆はにぶるばかり。 
ハチヤメチヤなパソコン論まで出る始末。 

あたたかく見守ってくれる読者の皆さん 
に甘えられたからこそできたのです。 


連載が決まったとき Y 氏にいわれた最初 
の命題「あるときは子供のように，そして 
あるときは大人の顔を」が今でも頭から離 
れません。それは，素朴な夢，大きな夢を 
どう見て，実現してゆくのが問われている 
ように思えました。しかし，実力•以上のこ 
とはできるはずもなく，浮き足し立ちと持 
ち前の臭味で，ご覧のとおり。 

でも，また再び自らの非力を省みず， 

より良い環境作りの蓄積を夢見ることにし 
ます。どうも長い間ありがとうございまし 
た。 

A 



連統する線を描く LINE 文に注意 

NEW BASIC および turbo BASIC の場 
合，前に XOR などのグラフィック文があ 
るときは連続線の頂点が表示されません。 
BASIC マニュアルには 書かれていません 
が，座標植の後に PSET ， C を指定すると 
解決します。アクソメソリッドを NEW ま 
たは turbo BASIC で利用する場合は400行 
などに注意してください。 


部品登録プ 


3 >木本本木本木本本本本木本本本本本本本本本本本本本本本本水木本本本木本本本本本本本本求本本木本本本本本本本本本本本本本本本本木本本本本本木本本本本本木本 

10 3 •フ7イルメイ"トクシ：1シ3ウケン"-フ"ヒントウ□ク フ* □ク''ラ厶- FOR XI 

15 31 木本木木本本本本本本本本本本本本本本木本本本本家本本本本本本本本本家本本本本本本本本本本本本本本本本本本本本本本本本本本本本本本木本本本木本本本本本 

20 IF KAI=0 THEN KAI=1 
30 ? ON ERROR GOTO 40000 

40 RESTORE 50:FOR 1=0 TO 8:READ 8¢ (I)sNEXTI 

50 DATA スンホ 0 , し INE,BOX ,CIRC,PAIN,PSET,BOXF,DEL „REFR 

60 RESTORE 70s FOR 1=0 TO 8:READ B1«(I) : NEXTI 

70 DATA G し ID , C し S0, PA し E, し CO し， INIT, 3Ut! ン，ヲテ t ン，才 9 ユ宁，□ヒ * 一 

80 RESTORE 90s FOR 1=0 TO 6: READ B2$<I)sNEXTI 

90 DATA P し 0,,WIND,C し S ,MENU, テイ t イ, NEW 

100 IF MAUOl THEN X=319: Y=99s GOTO140 ELSE し OADM M BMOUS “ 

260 ON KEY GOSUB 6000,6120,6200„6300,6400,6520,6620, 6800 ,6900,2040 

1900 7 本木本本本求本本本本本本本本本准本本*寒本本本本本 

1910 IF E<18 THEN Fl=E-8:GOTO1930 
1920 F2=E-17sGOTO2030 

1930 ON FI GOSUB 6000,6120,6200,6300,6400,6500,6600,6800,6900 
1940 GOTO230 
1950 ? 

1960 31 
1970 ， 

1980 " 

1990 ， 

2000 ， 
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2010 ? 

2020 J 

2030 ON F2 GOTO 9000,9500,2600,2070,2040,8000,2050 
8000 9 - テイ t イ - 

8010 BEEP z BEEP i CONSO し E 23,2 sCF し ASH Is PR I NT" シヨウ辛ヨ アつ， - 」 サ * ヒヨウノサイシヨノシテイ t! 3 " 5 CF し AS 
H0sBO=O 

8020 GOSUB 5000: BEEP:C し S 

8030 CLSs Xl=Xs Y1=Y:PRINT ••シテン X1,Yl = "s X, Y, : PRINT •• シ 3 ウテンシテイ t!3 ••: EtO=l 

8040 GOSUB 5000: BEEP:C し S 

8050 X2=X: Y2=Ys PRINT"i/ ： i9 〒 L/X2, Y2= H ;X ? Y 

8060 IF X2 - X1<0 THEN SWAP XI,X2 

8070 IF Y2-Y1 く 0 THEN SWAP Yl ? Y2 

8075 CF し ASH Is PR I NT " シティフ " フ " ンシヨウ宇 3 シヨリチュウ •• 5 s CF し ASH0 
8080 FOR J=0 TO DN-1 
8090 D$=DT$(J) 

8100 C1=ASC(MID$(D»,1,1)>-? < H40sC2=VAL(MID$(D$ !1 2,3 >〉 ： C3=VA し （ MID$ 6 , 3> > : C4=VA し < 
MID^<D$,10,3)>sC5=VA し （ MID«<D$, 14,3) >sC し 19,1)sC=VA し （ C し $〉 sIF C し东 ="" OR C 
>7 THEN C=7 

8105 ON Cl GOTO 日 1 10 ，日 1 10 ，日 1 10 ，日 1 40 ， 8150 ， 8150, 日 110 
8110 IF C2>C4 THEN SWAP C2,C4 
8120 IF C3>C5 THEN SWAP C3,C5 

8130 IF (Cl=l OR Cl=2 OR Cl=3 OR Cl=7) AND C2>X1 AND C4<X2 AND C3>Y1 AND C5CY2 T 
HEN FOR I=J TO DN-1s DT$(I)=DT$(I + l) ： NEXTI:HIKU=HIKU+1 

8140 IF Cl=4 AND C2>X1 AND C2<X2 AND C3>V1 AND C3<Y2 AND 4*C4<X2-X1 THEN FOR I=J 
TO DN-1:DT$(I> =DT$(I + l)sNEXTI:HIKU=HIKU+1 
8150 IF (Cl=5 OR Cl= 6 ) AND C2>X1 AND C2 く X2 AND C3>Y1 AND C3<Y2 THEN FOR I=J TO D 
N — 1s DT 樂 （ I 〉 =DT$(I + l)sNEXTIsHIKU=HIKU+1 
8160 NEXTJ 
8170 C し S 

8180 DN=DN-HIKU:HIKU=0 : し I=0:BO=0:EBF=0 

8190 CONSO し E:GOSUB5610:GOSUB .T.: GOSUB 5600 •_ GOTO 230 

9000 ^ フ^ヒン 

9010 BEEP:BEEP:CDNS0LE23,2sPRINT"7~t^ 3 三コミイチシテイ " ： BO =0 

9020 GOSUB 5000:X1 =X s Y 1 =Ys B0=1s GOSUB 5000:BO=0 

9030 IF X1>X THEN SWAP XI,X 

9040 IF Y1>V THEN SWAP Yl,Y 

9050 GOSUB 3000=CONSO し EzC し S 

9060 FI し ES"1 s •• s CONSO し E0,25,40,40s C し S 

9070 INPUT"3= ： 3= フ ” ヒンノフイルメイヲイレテラヲ " サイ " 5 PFI$ 

9075 CF し ASH Is PRINT •• フ " ヒ ：/ 3 ミコミシ 3 リチュウ •• 5 s CF し ASH0 
9080 OPEN"I",# ： L , "Is "+FFI 车 
9090 INPUT# 1, X2 , Y2 , X3 , Y3 

9100 KX=(X-X1)/(X3-X2)sKY=(Y-Yl)/(Y3-Y2) 

9110 INPUT 林 1•■ し Nz 2=0: ZS=0zEN=DN+ し N 
9120 FOR I=DN TO EN 

9130 し INPUT#1 ! 1 DT$jDT»(I>=DT« D^=DT$ (I) 

9140 ： KMZS=VA し （ KMZS$〉：IF ZS>KMZB THEN ZS=KMZS 

9150 KMZ^=MID«(D«,20,3) : IF VA し <KMZ$>=0 THEN KMZ=1 ELSE K:MZ=VA し （ KMZ $ 〉 

9160 IF ZCKMZ THEN Z=KM2 
9170 NEXTI:CLOSE 

9180 HSOK=VAL(HSOK$)sIF VA し （ HOK*>=0 THEN H0K=1 ELSE HOK=VA し （ HOK $〉 

9190 ZK=(HOK-HSOK)/(2-ZS) 

9200 FOR I=DN TD EN:D^=DT$(I) : E^=MID$(D$,1,1) 

9210 C2=VA し （ MID$<D$,2,3> >:C3=VA し <MID$<D 车 , 6 ,3)):C4=VA し <MID$<D«,10,3)) : C5=VA し （ MID$ 
<D$, 14,3) 〉 sC し $=MID$(D«,19, 1〉 r C=VA し （ C し丰 〉 s iF C し $=•••• OR 07 OR C く 1 THEN C=7 
9220 KMZS«=MID«(D$,23,3)sKMZS=VA し （ KMZS 漆） 

9230 KMZ$=MID$ (D$, 20,3) : IF VA し （ KMZ$>=0 THEN KMZ = 1 ELSE KMZ=VA し <K.MZ $〉 

9240 HSK=HSOK+KMZS 拿 ZK: HK=HSOK+KMZ 本 ZK•• HK$=MID$ ( STR% <HK)+" ",2,3) : HSK^=MID$ (STR$ 

(HSK)+" " ， 2,3> 

9250 C2=INT(C2 本 KX+X1> sC3=INT(C3*KY+V1) 

9260 IF E$="A" OR E«= n B" OR E»= U C U OR E$="G" OR E^="W" THEN C4=INT(C4*KX+X1)sC5= 
INT(C5 本 KY+Y1> 

9265 IF E^="D" THEN C4=INT<C4 木 KY> 

9268 IF E^="A" THEN DT$ < I > =E$+MID 东 <STR$ (C2>+•• , 2, 3), "+MID$ <STR$ (C3>+•• ",2 

,3)+", ••+MID«(STR$(C4>+" ,, ,2,3)+ M , M +MID« (STR« (C5)+ u ",2,3)+ ", n +MID« (D$, 18,8) 

sGOTO9280 

9270 DT«(I) =E$+MID$ <STR$ <C2> +" , 2,3)+", M +MID* (STR$ (C3)+ n •• , 2 , 3 )+", "+MID$ <ST 

R«(C4)+" M ,2,3)+ M , ,, +MID$(STR«(C5)+ , ' n $ 2 9 Z)+ ", "+STR$ <C>+HK$+HSK^ 

9280 NEXTI:PA し ET:CONSOLES CLOSES CLS 

9290 GOTO 2290 

9500 ，フ * ヒントウロ？ - 

9510 BEEP=BEEF 1 sLOCATE0 !l 23sPRINT"7'*t：y トウ □ クイチシテイ " s BO=0s し OCATE20, 23z PRINT"! ■• テン " 5 
9520 GOSUB 5000:X1=X s V1=V: B0= 1: GOSUB 50QQ:BO=0 
9530 IF X1>X THEN SWAP XI,X 
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► ’85 年 3 月号の MUSIC EDITER を，やっとの思いで入力し終わりました。現在，中学時 
代の音楽の教科•書を引っぱり出してきて悪戦苦闘しているところです。 

加藤一隆 （17) 愛知県 






9540 IF Y1>Y THEN SWAP Y1,V 
9550 BOSUB 3000:C し S 

9560 FI し ES"Is":CONSO し E0,25,40,40sC し S 

9570 INPUT •• トウ□ク フ "t ンノフ 7 イルメイヲイレテクラ•サイ P- ,, ;PFI$:PFI$="P- ,, +PFI^ 

9575 CF し ASH Is PRINT ••フ * ヒントウ □ クチ： ! ウ " 5 = CF し ASH0 
9580 OPEIVTO •• ，林 1, "1:"+PFI* 

9590 PRINT#1,X1,V1,X,Y 

9600 PRINT#1,DN 

9610 FOR 1=0 TO DN 

9620 D$=DT*(I)sE$=MID$(D«,1,1) 

9630 C2=VA し ： C3=VA し （ MID$(D$, 6 , 3 〉〉 ： C4=VA し <MID$(D$,10,3)):C5=VAL(MID^ 
(D^, 14,3 〉〉 sC し $=MID$(D$,19,1> zC=VA し <C し s IF C し $=•••• OR 07 THEN C=7 
9640 KM2$=MID^<D$,20,3) 

9650 KMZS$=MI(D»,23,3) 

9660 C2=C2-XlsC3=C3-Y1 

9670 IF E$="A" OR E$= M B n OR E$= M C U OR E$="G" OR E»="W" THEN C4=C4-X1sC5=C5-Y1 
9680 DT$(I)=E»+RIGHT$(" "+STR$(C2> ,3)+", "+RIGHT$<" M +STR$<C3) •, 3〉 +••, "+RIGHT$ ( 
•• M +BTR$(C4),3>+","+RIGHT»(" "+STR$<C5 〉 ， 3)+", n +STR^(C)+RIGHT$( H U +KMZ^,3) + 
KMZS« 

9685 IF E^="A" THEN DT^ (I 〉 =E^+MID» <STR» (C2〉+•• , 2, 3)+••, "+MID$ <STR$ <C3〉+" ",2 

,3)+"：, ,, +MID« (STR 车 (C4)+ M , 2,3>+•• ：« "+MID 隼 (STR$(C5)+ U ",2,3〉+ ", M +MID« (D$, 18,8) 

9690 PRINT 轉 1,DT$<I) 

9700 NEXTI:IF G し =1 THEN G し =0:GOSUB 6000 

9710 C し OSE:PA し ET:CONSO し EzGOSUB5610sC し S0sGOSUB 5600 sDN=0sGOTO 100 


— RS-232C- 


5 •…"……… 

10 * — フ Wit メイ •' 

11•寒"…………"……""""*…"""……"……""""*…* 

14 CLOSE 

15 r 0N ERROR GOTO 40000 

16 ON KEY QOSUBS 的的 , 300 的 , 300 的 ,30000,300 的， 3 的的 , 300 的 , 30 的 0,30 的 0 

1? CONSOLE0, 25: CLS ： LOCATE0, 24: PRINT " F1H1ENU»2-MENU«3-«ENU 來 4-MENU»5-MENU 杂 6-MENU 杂？ H1ENLB«8>+!ENU»9~MENU»10COKr 
20 GOSUB3010 ： CONSOLE 5,15,20,40 ： C0L0R2 ： KM0DE1 
50 PRINT データ通信 RS-2S2C 30»T- ftT ット • 

40 PRINT ： C0L0R4 

1 明 PR1NT-1：DATA IN 

120 PRINTS：DATA OUT - 送 ft- 

128 PRINT_3:MENU —!^ aia- にもどる " 

129 PRINT ： C0L0R1 

130INPUT • どれを行なうか番号を還んで下さい -; W 
140 IF YhW THEN QOTO-DLOAD" 

150 IF VT 卜 2 THEN QOTO-DSWE" 

165 IF YN-3 THEN INIT ： CHAIN*JOB SELECT" 

170 QOTO10 
2190 UffiEL-DLOAD" 

22 明 GOSUB5010 ： CONSOLE ： PRINT W DATA L0«H«252C を fl 雄してください *: PRINT 今度坪びだすと合成しますか (NO«0 YES-1 ) w ； 
：IhPUT m 
2210 GOSUB3000 

2220 OP0ri*Mn,"COM:lN83XNLiJD- 

2225 TOR I»0 TO 24：LINPUT »l,Tft$(l>:Pft$(l)*HEXCHR$(TA$<l)):N0<TI 
2230 LIhf^»l,Lm ： UM^fiL(L>l$)：IF WM THEN EN<N+DN ： ST-DN ELSE ST=0 EN«LN 

2255 FOR I*ST TO EN 
2240 UhRfnil ， DT$ 

2245 PRIMTI,DT$ 

224? DT$(I)-DT$ 

2250 NEKTI 

2252 CLS: CLOSE 

2256 DN-EN 
2260 GOTO10 
2290 UffiEL-DSWE" 

2300 QOSUB5010 ： IW^UT "DATA 0UT-RS232C を MB してく ださい *; VN 

2520 OPEN-O-, HI,"COM ： lNe3XNLUD- 

2325 * F (3 R 1=0 TO 24 ： PRINT»l,Tl^CI)：NEXTI 

2530 PRINTttl,DN：FOR 1-0 TO DN 

2540 DT$-DT$<!) ： PRINTttl,DT$ 

2545 PRINTI,DT$ 

2350 NEXTI ： CLS：CLOSE 

2360 INPUT^r ノ，”イ n VTj 7^(YES-1 N0=2>.;YS:IF YS-1 THEN DN«0 


►全国の MZ - 2000ューザーの皆さん/ 11 月 17 日の r 天才たけしの元気が出るテレに 
MZ - 2000が登場しました。ご出演，おめでとうございます。 但馬稔郎 （15) 福島県 
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2370 QOTO10 

3000 FOR 1-0 TO 7：Pft.ETI,I：N0a：RETURN 
3010 FOR 1=0 TO 7:PfiLETI,0:NEXT:RETURN 
50000 CHfilN*JOB-SELECT 

40000 , - 

40005 INIT：F0R 1-7 TO 2 STEP-1 : COLOR7,1 : NEXTI : CRi«Hl 

40010 IF ERR-73 THEN PRim ■舞シュ％ 符 -<70 •: PLAY "GFEDC" : CFLASH0：CLS : COLOR,0：RESIWE20 

40020 IF ERR-55 THEN PRINT フ Wl 扩 7'JTO -•: PLAY "GFEDC" : CFLASH0：as：COLOR,0：RESUME20 

41000 PRINT 15-ITYbC イ-•: PLAY W GFEDC W : CFLASH0：CLS：COLOR,0：RESUME20 




XJ^XWTiifiw シリーズ m DISK UTILITY 

CATS SAVER 

サポートプログラムを利用する事により 64 キロバイトを超えるプログラムや複数に分割されたブログラムを取り扱う事もできます。 

新発売/3インチ .5 インチ版共¥9,800 


CATS SAVER は XI シリーズの IP いノフトあるい 
は XI 付厲の BASIC CCZ -8 CB 01) を利闬するプロ 
グラムをディスクで取り扱うためのソフトです。 
一度にセーブできるサイズは64キ□パイト、つま 
り一本にまとまっているソフトなら何でもセーブ 
することが出来ます。 CATS SAVER を使ってテ 
—プ等で供給されるプ□グラムをディスクにセー 
ブした場合、一枚のディスケットに顓大40個のソ 
フトを収録でき、セーブされたソフトを走らせる 
際、□—ド時間は6秒以内と高速です。 


•ディ スクメニュー方式で、プログラムの確認 • 起動がワンタッチで行えます。 

操作は簡单、メッセージ方式ですベてパソコン側が指示します。 

• テープを読み込んでディスクへのセープは一回の操作で〇 K 。 スタート番号等 
を調べる必要はありません。 

參64キ□バイトのプログラムでも自由にディスク"―►テープ • ディスク "，デ 
ィスク間でファイルの転送ができます。 

•ディスクエディタが付属しておりますので.プログラムをディスクにセーフ 
すると解析や改造がわかりやすくなります。 

• リセットで走らせることのできる IPL 起動のマスターディスクを好みのプロ 
グラムで簡串に作ることができます。 


初心者の方にもキャッツセーバーを有効に利用して頂け ますようサボートプログラムを用意しております。 

XWm HI-SPEED FIllEk 《ロード時間のいらいら解消！》発売中 ¥2,800 ( SZ 7" 不可） 


テープでの ロード、 セ ーブ 時間を 

大幅に短縮 

あなたのソフトに強カプロテクトを 
掛けることもできます。 


IPL から□—ドするソフト. BASIC を読み込ませてから□—ドするソフト，共に□—ド時間を通常 
の約半分にしたテーブを作れます。 （ IPL ソフトをコンパートしたテープは. IPL から□—ド可能） 
また，コンバートしたテープには自動的に強力なプ□テクトが掛か 1 J ますので自作ソフト等の保護 
にも役立ちます。 

例えば、 XI をお使いの方で BASIC ROM (拡張 BOK が必要）をとお考えの方.そんな費用のかかる 
ことをする前に一度. H 卜 SPEED FILER をお試し下さい。今まで約2分30秒以上かかつていた 
BASIC の□ー ドが約半分の時間で完了します。 


P3 


COMPUTER SOFTWARE HOUSE 

CATS EYEc 


o. 


r お求めは全国の有名 マイコンショップでどうぞ。 通信販売も受け承ります。送料いずれ 

\ も 500円、お申込みが5,000円以上の方は、送料当社負担，（現金窨留にてお申込み 下さい。） 

〒537大阪市東成郵便局私書箱77号 TEL . 06(971)5410 
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•NEW PRODUCT 

新型ワードプロセッサ 

WD - 210 0, WD -50/55 発売 

シャーラ 

これまでのヨコ書き表示だけではなく， 
タテ書き表示も可能な本格ビジネス日本語 
ワードプロセッサ「ニュー書院 WD - 2100」が， 
シャープより750,000円 （プリンタ別売）で 
発売された。 

この WD - 2100 は，ビジネス用の日本語ワ 
ープロとして必要な作図機能，グラフ機能， 
抽出/分類機能，演算機能などに加えて， 

表計算型の簡易言語「書院カルク」が標準 
装備されているため，総合 OA 機器としての 
用途がさらに広がった。 

WD - 2100 の主な特長は， 

1. ただタテ書き印字ができるだけではなく， 
画面もタテ書きで表示。 

2 . 表示部は 14 インチのワイドで見やすい C 
RT デイ スフ。レイ を採用。長時間のオペ レ 
ーションでも疲れを感じない。 

3 •文節変換だけではなく，まとめて入力し 
た文章をあとで文節単位で変換できる一 
括選択方式を採用。 

4 .通常の日本語の文章だけではなく，ルビ， 
分数，表を含む複雑な文書作成の際，あ 
る特定の行だけの行間ピッチを変更し改 
行する特殊改行機能を採用。 

5 •仕上がりの印字イメージを X ，％， M に縮 
小して画面に表示できるレイアウト確認 
機能を採用。 

6. 2ページ分の印字内容を％に縮小し，1 



ページにまとめて印字することが可能。 

7. 作表•集計もこなす簡易言語「書院カル 
ク」を標準装備。 

8. 多くの情報一覧の中から指定した内容を 
選び出したり，情報を並べ替えるソート 
機能を採用しているために，必要な情報 
の抽出，分類が簡単にできる。 

9. ビジネス文書に欠かせないグラフ作成， 
作図機能も充実。 

10. オプションにドットインパクト方式のプ 
リンタ WP -220 DP ， WD -220 BP (各350,0 
〇〇円），熱転写方式の WD -200 TP (88,000 
円）を用意。 

また，シャープではこの WD - 2100に加え 
て，普及型パーソナルワープロ「ファミリ 
一書院 WD -50/55 丄(各69,800丹)の発売も 
開始した。 

この WD -50( JIS 配例準拠キーボード）と 
WD -55 (50 音配列キーボード）は，美しい 
明朝体の24ドット印字，ハガキ印字が可能 
と，本格的機能を備えながらも7万円を切 
った価格で今回発売されたもので，約3万 
1千語の辞書を内蔵するなど，使いやすさ 
を追求したワープロである。 

WD - 50/55の主な特長は， 

1•文字パターンは24ドット構成の明朝体を 
使用。また，官製ハガキへの印字も可能 
な新開発プリンタを採用。 

2•固有名詞（姓，名前，地名）約7千語を 
含む約3万1千語の辞書を内蔵。 

3•十二支，星座，お天気 マークな どの120種 
類のイラスト記号の表示可能0 

4. 案内状などの作成に，文章のまわりを線 
や記号で囲むことのできる枠組み機能を 
採用。 

5. 縦横各1〜24倍（最大約8 X 8 cm ) まで 
文字や記号を拡大印字可能。 

6.32字までの常用句登録，10種類までの外 
字登録が可能。 

7. ギリシャ文字や X 2 ， H 2 0 などの上つき下 
つき文字など，特殊記号345種類の使用が 
可能。 

8. 電源を切っても約1300字 （ A 4 判 1.3 枚分) 



まで記憶できるメモリ保護機能付き。また 
カセットインタフェイス内蔵のため，力 
セットテープに文章を記録することもで 
きる。 

9.小型，経量 (329. 5 X 300 X 51 mm , 2.6 kg ) 

のコンパクト 設計で， カラー も黒と白の 
2色が用意されている。 

く問い合わせ先〉 

シャープ ㈱ 007435(3) 5521 

CAP-X ソフト搭載 

ボケコン PC -144 牌[発売 

シャープ 

情報処理技術者試験の第1種，2種の出 
題利•目である CAP - X ソフトを搭載，さらに 
BASIC を採用し， n 進（2, 8，16進）で 
の論理演算機能を充実させた多機能ポヶコ 
ン PC -1440 (17, 800円）が12月18日より新 
発売される。 

この PC -1440 は， CAP - X 命令をアルファ 
ベットキーに割り当て，ワンタッチ入力を 
可能にしている。 

PC -1440 の主な特長は， 

1. 情報処理技術者向けプログラミング言語 
CAP - X ソフト搭載。 

2. アセンブラプログラミングに欠かせない 
2, 8，16進数での論理演算 ( AND ， OR ， N 0 
T ， X 0 R ) と補数計算が可能。 

3. 16進データが入力しやすい独立16進キー 
を採用。 

4. PC -1400 シリーズのソフトが活用できる 
BASIC を採用。 

5.1 CAL | キーを押せば ワン タッチで閨数電 
卓に切り替え可能。 

く問い合わせ先〉 

シャープ ㈱ 007435(3) 5521 
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•INFORMATION 

豪華商品が当たる 

XI 発売3周年記念 
キャンペーン実施中 

シャープ 

シャープでは， XI 発売3周年を記念して 
XlturboII を発売したが，それにあわせて11 
月16日から1月15日までの2力月間，ユー 
ザー向けキャンペーンをも全国で展開して 


いる。 

このキャンペーンでは，全国のパソコン 
ショップや販売店に置いてあるアンケート 
に答えると，その場で素敵なキャンペーン 
ステッカーがもらえる特典があるほか，ア 
ンケートに付いているクイズに答えると， 

シャープビデオムービーやドットプリンタ， 
そのほか豪華商品が抽選で当たるなど，さ 
まざまなイベントが用意されている。皆さ 
んも一度，お近くの店頭をのぞいて見ては 
いかがでしようか。 


く問い合わせ先〉 

シャープ 006(628)1653 



N もあっていい。この工場用 LAN につい 
て米国 GM (ゼネラル•モータース）社が’83 
年から IBM ， DEC などコンピュータ8社と 
決めた通信手段が MAP という。さき頃モト 
ローラが通信用 LSI の出荷を開始するなど 
準備中で，’87年春頃から使えるようになる 
そうだ0ホスト，パソコンのほかに NC 制 
御装置，ロボット，計測機器までっなぐも 
のだ。 

\ h\a (ホームオートメーション）はどうい 
う形で実現しますか？ 

K.T ①セコムのやっているホームセキユリ 
ティ②パソコン通信のようなデータ通信系 
③テレビ中心の AV システム系——の3系統 
がある力';，どうやらバラバラに進みそうだ。 
商談はメーカーが住宅会社に売る形で進ん 
でいるが，②だけはエンド ユーザー にも比 
較的早く売れそう。 

111 BM の日本でのパソコン分野での攻勢は？ 
K . T ゅっくりで，それでいて遊びがないと 
言える。ビジネス用は’85年に5540と5560を 
追加したことで着実だが,全体の売り上げは 
まだ全社の約3 %を占めるにすぎない。家 
庭用は JX を便宜上続けている形だが，ニュ 
ーマシンに切り替える話は私の耳には入っ 
ていない。ただし値下げはある。すでに定 
価の4割引きで売られている。 
JOYSTICK やマウスの将来性は？ 

K.T ジョイスティックは ファミコン， M S 
X の発売以降，改良が進んでいる。今後は 
標準搭載する機種も含めて採用が増えよう。 
ただし，トラックボールという球形の装置 
もチラホラ出ているが，これは米軍の軍用 
機で使っているほど操作性がよく，ライバ 
ルとして浮上しよう0 

マウスはビジネス用 CAD / CAM を中心 
に完全に普及した。ライバルはライトペン 
だが，フラット形デイスプレイが出てくる 
とマウスが有力になる。 


AgainWatclilid 


大特集 QSA: A から乙まで 

早いもので連載1周年記念を迎えた。何 
かしようと思い悩んだ結果，私が知る限り 
の範囲の中で，1986年度に予測される変化 
のうち皆さんが知りたそうなことをとりま 
とめて答えてみよう。 0 h ! MZ が贈る第3 
の質問箱にまで発展するかは予断の許さな 
いところだ。さあ，何でも聞いてくれ！ 
私は知らないこと以外はすべて知っている 
のが自慢なのた； 

[ SPPLE 社の新型パソコンが出るのはいつ 
ですか？ 

K.T ズバリ86年1月である。32ビット機 (M 
C 6802 0) で ハイスピード， しかも マッキン 
トッシュより安い，ホームユース志向の機 
種ではないかという情報もある。 

固 ASIC の日本語化は進みますか？ 

K . T 進む。たとえば命令語をこれまでの英 
語表記から日本語表記に置き換える方法も 
あるし，別の方法——たとえば，富士通で 
は表示とプログラミンダのときだけ日本語 
で，内部処理やセーブ時は元の英語版コマ 
ンドに戻る方法も，いくつかアプローチが 
なされているようだ。 

回 D - ROM の商品化概要を知りたい。 

K . T 投入時期は春のマイコンショウあた 
り。発売メーカーは東芝，ソニー，日立， 
松下，パイオニアが確定。いずれも MSX 2 用 
で，価格は1基15万円前後。データのパッヶ 
ージメディアとして考えられており，百科 
辞典や文献などの電子出版や写真入り地図 
などが予想される。 600 M バイトのデータが 
入るので ， FM -77 AV だと6000画面の絵が収 
録できる。すごいアドベンチャーゲームが 
できる。シャープでは X 1グループが検討 
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しているが，膨大なデータを提供するメデ 
ィアなので，メーカー独自機種では難しい 
かもしれない。ソフトの移殖のようにホイ 
ホイとはいかない。 

回 EC などのミニコンはどうなるんでしよう 
か？ 

K.T はっきり言って， パソコンとミニコン 
の機能差は縮まる 一方。 そこで ミニコンメ 
一力一は何か専門分野が必要となるが，そ 
れは通信制御と人工知能だと言われている。 
DEC が VAN と人工知能に全力投球している 
のはそのためだが，もしそれも パソコンに 

とられたら . いちパソコンメーカーにな 

るか，あるいは廃業しかない。この方向性 
は’86年度中に明らかになる。 

Ec との貿易摩擦はバソコン業界では？ 

K . T ないとは言えない。すでに欧文タイプ 
ライタで日本メーカーがダンピングしてい 
るとして2〜3割の輸入関税をかけている。 
複写機や油圧シヨベルもすでにやり玉に上 
がっており，あと20種類の商品が候補に入 
っているそうだ0パソコンは恐らくその中 
のひとっであろう。 

[0 AX とパソコンはつながりますか？ 

K . T もちろん。’86年のエポックのひとっに 
なるだろうが， パソコンに イメージスキヤ 
ナを付けるだけで絵が入力でき，あとは通 
信機能を使って送受信するのはたやすい。 
印刷はプリンタだ。すでに数社が試作を終 
え，また超極秘情報だが NTT が商売として 
考えており， PC - 9800はすでに確認済み。今 
MSX 2 でできるかどうかを某社に研究させ 
ているところだ。 

囹 M - MAP って何ですか？ 

K . T 会社の中でコンピュータ同士をっなぐ 
のは LAN ( E 参照）だが，工場専用の LA 






区 |T 氏力 5 ' Again Watch の執筆から降りると 

いう噂を聞きましたが . 。 

K.T 恐らく現実のものとなる。私は今年半 
ばで本業で地方に飛ばされそうなのだ。 
[ Dan 市場はどうなりますか？ 

K.T ワーク ステ ー ションという名の高級パ 
ソコンを束ねてひとつの力にするための配 
線として，イメージが固まってきた。オフイ 
スプロセッサの登場（回参照）も LAN の実 
体が伴ってきた具体的な事象であり，’86年 
が真の意味でのスタートだ0これまでのよ 
うな「特別な製品」からプリンタケーブル 
のように気軽に使うようになる。したがっ 
てメー カーはどこでもいい。 

USX の近況を教えてください。 

K.T 主幹会社のアスキーによれば，’85年 
度末には累計出荷台数が100万台に達する 
そうだ。それは国内14社が競い続け，在庫 
がたまっても次から作へと新モデルを発売 
し続けた努力 （？） の結果だ。まさに利益な 
き血まみれの戦いだったが，とにかくユー 
ザー数も70万人はいそうで，やはり「共通 
性」の意味から見ると恐怖のパワーだ。 
[ETT のバソコン 戦略が知りたい。 

K.T ビジネス用は 「コムエクセル」 という 
名で， PASOPIA1600 を売っているが，大し 
たことはない。 

狙い目はもちろん通信で, ’86年10月に 「N 
TT • PC コミュニケーション ズ」という子 
会社がパソコン通信の交換センター業務を 
はじめる0 電話のように，リアルタイ ムの 
パソコン通信仲介業を中心にするから，チ 
ヤ タリングなどの同種の サービス だけはア 
スキー ネットなど他のパソコン通信 サービ 
ス会社では手が出ない。結局，長いものに 
巻かれることになるのが’86年のパソコン通 
信市場と言える。 

回 ffice Computer はどうなるのですか？ 

K.T 実は中小企業のホストとしての オフコ 
ンは’85年にすでに死んだ。’86年からは汎用 
コンピュータ と パソコンの 間の調整役と 
しての役目を兼ね備えた発展的な商品であ 
る 「オフイスプロセッサ」 として再 スター 
卜を切る。 パソコンのマネージ ヤーと言え 
るだろう。もちろんネットワークとの通信 
サーバーとしての役目も果たす 
IEC シリーズ （NEC) の独走は今年も続く 
のでしょうか。 

K.T 何を言うか，ハ 0 ソコンを① MSX など低価 
格機，②88など家庭用中•高級機，③98など 


ビジネスパソコン-の 3 つに分けると， 

①は徹退したようなものだ〇②も turbo IIや 
FM-77AV などが出て，以前ほど強くはな 
い。’85年の時点では②と③で強かったが’86 
年には独走は③だけになる。しかしパソコ 
ン市場で NEC のトップがゆらぐのはしばら 
く先だろう。 

回 D の行く末はどうなるのでしょうか？ 

K.T はっきり言って， パソコンの メモリが 
もはや 64K バイトを超えてしまった今では， 
パソコンの 外部記憶装置としては苦しい立 
場だ。しかし世の中には 64K バイト以下で 
すむ仕事も多い。案外と電卓や ワープロの 
文書デイスタとして普及するかも。 

[R]obot とパソコンはこれから関係が深くな 
るかなあ？ 

K.T もちろん！これも ’86年の期待分野だ。 
すでにファミコンでは，ロボットを制御し 
て遊べる〇「プラレス三四郎」ではない力 ? ， 
パソコンにロボットをつないで戦わせる日 
も近いのではないか。「全日本ロボット格闘技 
選手権」なんてスゴイぞ。そのときに改め 
て「パソコンは格闘技だ」と言えるんじや 
ないのか。 

[UHARP で’86年に変わることは？ 

K.T さあ。佐伯旭社長がそろそろ会長にな 
るのではないかな。 

ITlele-Communication はどの程度まで進みま 
すか？ 

K.T 0と回を言売んでもらえばわかる力す，’86 
年は実感として進んでいくことがわかる年 
になる。ただしこれはビジネス分野の話で， 
家庭用バソコン通信は第1段階を迎えるの 
にもあと2年はかかりそう。 

PNIX は普及するのでしょうか？ 

K.T ほかにない以上，やはり普及してしま 
うでしょう。これは私の推測だが日本では 
LAN で接続した コンピュータ 間（ホスト， 
オフコン，パソコン） で，共通利用できる 
ソフトを 作るための道具として使われるの 
ではなかろうか。同じ OS でも パソコン 専 
用の MS-DOS とはそこが'違う。 

0AN (付加価値通信網）って何ですか。私た 
ちとも関係あるんですか？ 

K.T もちろん。定義は「異なるプ ロト コル 
(通信手段）間のコンピュータでも通信で 
きるネットワーク」で，会社——銀行間な 
ど，まあコンピュータ間の広いネットワー 
クと 考えればいい 0 パソコン通信はもちろ 
ん含まれるだろうし，家庭にあるパソコン 
とホストをつなぐ VAN も PC-VAN (NEC) 


などいくつか出てきている。’85年は VAN 
が実際に使われ出す年だ。ただし「できる」 
のと「使う」のは違う。家庭での普及はず 
いぶんと先の話。 

のブームはこれからもまだ続きますか？ 
K.T もちろんです。ポータブルワープロは 
人気爆発で，’85年は’84年比4倍の80万台が 
売れたそうだが, ’86年も’85年比5割増の120 
万台は当確だ。ただ。ひと言，売れ方の文具志 
向が強まっていたので，パソコンの需要層 
とは遊離していくようだ。つまり競合しな 
くなる。 

[X]1シリーズはこれからどう発展するので 
しようか？ 

K.T その前になぜXIが後発なのにこれだ 
けヒットしたかを説明しよう。性能の高さ 
もさることながら，あのパソコンはビデオ 
やテレビの担当者が家庭向きのパソコンを 
作ろうと開発した点にある。ほかはすべて 
コンピュータや電卓の担当者が作ったため 
に，いまいち家庭用としてなじめなかった 
ことは否めない。すでにテレビ， VTR，VHD 
ビデオディスクがつながっているが，今後 
CD など AV 系の家電製品が次々にXIに接 
続されてい〈だろう。将来像は HA の中核 
機器になりそうだ。 

0AMAHA (日本楽器製造）のパソコン市 
場での狙いは何でしようか？ 

K.T MSX 積極派の1社だが，将来的には音 
楽分野とニューメディァ市場との融合を狙 
っており，そのキッカゲとしては悪くなか 
ったと見ていい。 

もうひとつ， LSI のビジネスも重要で， 
MSX2 では東芝と並び主要 LSI の供給メー 
カーと して アスキーから 指定され ている。 
FM 音源 LSI も売れているし，今後，特化し 
たカスタム市場での有力企業になりそうで 
ある。 

[Z] 80などの8ビットマイコンはどうなりま 
すか？ 

K.T 何が何でも16ビットではないのが マイ 
コンのおもしろいところで，未だに4ビッ 
トマイ コンは生産量で他をしのいでいる。 
MSX などは一例だが，’86年はどんな用途に 
使うべきかを，利用者と生産者が確認しあ 
う形になろう。 

以上。感想や別の質問をくれたまえ。区] 
のところで書いたように，私の命は残り少 
ない0 (K.T) 
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プレゼントの応募方法 


とじ込みのアンケートはがきの該当項目をすべてご記入の 
うえ，希望のプレゼント番号をはがき右上のスペースにひと 


D 


BASIC HOUSE S0286(33)I994 


つ記入してお申し込みください。締め切りは1月15日の到着 
分までとします。なお，当選者の発表は3月号で行います。 


回 


デジック 


©0899(24)0914 


SUPER 
RAM BOARD 
MB- 1000 

Xl/Xlturbo 用 2 名 

99,800円 

大容量 1 M バイトものメモ 
リを持つ外部 RAM 。 便利なユ 
ーティリティも付いている。 


SUPER 

RAM 

MB-1000 

(1 M BYTE ) 

強カユーテイリテイソフト付 


回 


キヤリー.ラボ 0096(363)0047 


増設 RAM ボード 

KGB - 128KBMZ 


MZ- 2500 用 5 名 

特価9,800円 


SH/VRP 

EXPRESSION OF SHNS«IUTY& COMMUNICATION 

mmmwm 

^ MZ- 2500 

増設 RAM ボード (128KB) 

型番 KGB - 128 KMZHHH 


MZ - 2500用の増設 RAM でシ 
ヤープ純 iF •の MZ -1 R 26(3 5,0 
00円）と完全コンパチです。 


愛読者 

プレゼント 

© Q ^ ^ ® ^ ® 



JET - X 1 

Xl/Xltu 「 bo 用 
5 名 


5 D : 35,800円 
日本語ワードプ 

ロセツサのロング 
セラー JET シリー 
ズの 最新 バージ ョ 
ン。 XI 用と ， Xltu 
rbo 用の2つのモー 
ードがある。 


□ 


日本マイコン販売 003(366)3274 


丁フ 

Xlturbo 用 3 名 

5 D : 32,000円 


ハ。 ーゾ ナルに ビジネ 
スにと威力を発揮する 
日本語ワードプロセ 
ツサ。16ビツトから 
Xlturbo に移植され 
て登場。 




回 


BPS 


S 045(42 l )7421 


ザ•フアイヤークリスタル 


XI /Xlturbo 用 3 名 

T : 4,800円 

大ヒット，ブラックオニキスの第2弾！ 
より本格的な R P G となって登場。 


XI ターポ XI シリーズ _ 

活用プロクラム 


m 


学習研究社 


303(720)1 I I I 


XI ターボ/ XI シリーズ 

活用プログラム特選集 

システムハウス 1 

P&P マイコン 研究会編 2,300円 

先月号でご紹介した， BASIC プログラム 
の学習書，基礎からじつくりと勉強したい 
人に最適。 



特選集 

' シ3テ“、ウス p&p マイコン研究会縝 
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麵 


^ lliz 発売記念プレゼント 


シャープ提供による豪華プレゼント第2弾！今月は MZ シリーズ用 
ソフトをドカーンと火放出。今では入手が困難な名作ソフトもあり今回 
が最後のチャンスとなるかも。 



n-F 

_ ■ 


(東海クリエイト） 
S 03(456)46 l 0 


S-CALGO 

MZ - 700/1500用100名 

T : 9,800円 


■■A 


表計算 • 簡易言語 

SCALGO 


System 

Program 

MZ-5Z002 

MZ - 700/1500用10名 

0 D : 10,000円 


SH/XRR 

mz •万 

SYSTEM PROGRAM 


グラフ 8 



• — l 




1^； 

となた cr ち■•に 
* しいク9フ礞 
作ることかで^ます 


G (パーソナルメディア） 

©03(490)8841 

グラフ 8 



• ク ，: 


MZ - 700/1500用100名 

T : 12,000円 





-B 

PASCAL 

Interpreter 

MZ-1Z004 

MZ - 2000 2200用 10 名 

T ： 12,000円 


EM 


lihL 

MZ-LOGO MZ-LOGO 

MZ - 2000用100名 MZ - 2200用100名 


T : 9,800円 


' : 9,800円 


MZ 1000 


mz LOGO 


System Program! 

MZ-1Z005 


響寧薄き 


MZ - 2000 /2200 用10名 I 


T ： 25,000円 




Bl-p 

Machine Language 

MZ-1ZOOB 

MZ - 2000 / S 200用 10 名 

T : 7, 000円 


111 -E 

Floppy DOS 

MZ-EZQ04 

MZ - 2000 /2200 用10名 | 

5 D : 50,000円 



11 月号愛読者プレゼント当選者発表 


ffl スーパーカラー BASIC 冬 （愛知県）高瀬博司（静岡県）池田和弥 
(新潟県）金田幸一（岩手県）福永俊二（秋田県）竹田忠雄® 
(栃木県）岸孝弘（埼玉県）西野寿泰（大阪府）山田晃弘（兵 
庳県）野田明男（千葉県）大并英美囵オイルズ•ゥエル（神奈 
川県）永井克宜（滋賀県）横井太道（愛媛県）栗田智之 （1 マジ 
ックファクトリー（石川県）久保出紀史（千葉県）桜井肇浩（埼 
玉県〉森田達也ポケットブック（静岡県）村田利弘 （岡 

山県）大西宣行（青森県）清水頭武信（愛知県）吉見裕史（神 
奈川県）内瀬戸久司（栃木県）小林由和（熊本県）石坂康誠 
(石川県）小林孝（兵庫県）成田博一（東京都）秋山賢史（敬称略） 
ほか40名の方0 

以上の方々が当選されました。おめでとうございました。なお，賞 
品は順次発送いた I ますが，入荷の状況によって多少遅れる場合もご 
ざいますのでご了承ください。 
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100 

no 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300. 

310 

320 

330 


〈く差出人住所》 > 

し PRINT " 〒〇 6 3 " 

LPRINT " 札榥市南区加賀3 丁目3 - 8 
LPRINT " 

し print " 北斗 m 
LPRINT •’ 

LPRINT " 

’ く〈宛先人住所>> 

LPRINT " 〒10 2 " 

LPRINT ” 東京都千代田区四番町2- 1 
LPRINT ” 

LPRINT " (株〉日本ソフトバンク 
LPRINT " Oh ! MZ 編集室 御中 
LPRINT ” 


1 ■はがき印字のサンプル』 

このようなフォーマットで印字すると、はがきに簡堆に住所が印字できます。 
DIP SW - No .4 C 0 FF 〕 の時は縦#きになります. 

DIP SV - No .4 CON ] の時は梢翥きになります。 


インテ U ジェント 
漢字プリンタ 



ブラザーから発売されたこのプリンタは， 
低価格(本体定価128,000円)ながら，24ピン 
のドットインパクト方式で漢字を印字でき， 
また，その名のとおり型式の定まった用紙 
への印字を簡単に行えることや，はがきへ 
の印字を簡単にこなしてしまうといった特 
徴もあります。これらについて実際に使用 
してみての操作性や印字例についての報告 
をします。 

0はが吉印字も可能 

このプリンタは，従来の漢字プリンタと 
同じ機能の他に， セールス ポイントである 
いくつかの 特長を備えています。まずはそ 
の中のひとつである「はがき印字 モード」 
はがきの印字 


について紹介することにします。 

オンライン（はがき印字）スイッチを押 
しながら電源を ON にすると，このモードを 
設定できます。このモードは官製はがき（私 
製のものでも大きさを同じにすれば可）に 
住所，氏名を簡単に印字できるようにする 
ものです。普通のプリンタでは，はがきの 
位置決めやパソ コンから 送る データのフォ 
ー マット が大変ですが，このモードではそ 
れらをプリンタが自動的に行ってくれます。 

印字するデータはワープロソフトや顧客 
管理ソフト，あるいは BASIC (2500, turbo 
は付属のもの， XI は NEW BASIC + K 

サンプル1 


ANJI . Uty ) で作成します。1件のデータ数 
は6行までで，1行目を郵便番号（数字の 
み有効)，2〜6行目を住所 • 氏名データと 
して漢字で16文字まで使えます。あとはは 
がきを枠に入れスイッチを押すと，自動的 
に印字位置にセットされるので，データを 
送ると所定の場所に印字されます。 

Q 「割付名人 J は割付けの名人 

もうひとつの特長は，書式の決まった用 
紙への印字を行う「書式印字モード」です。 
改頁（書式印字）スイッチを押しながら電 
源を ON にするとこのモードが設定できま 
す。 

このモードは，見積書，注文書といった 
定型用紙への印字を容易にするモードです。 
すなわち，各印字項目（氏名，年月日，製 
品名，金額 etc .) の印字開始位置がプリン 
夕に記憶され， パソコン 側からはデータの 
フォーマットに 煩わされることなく，項目 
順にデータを送るだけで決まった様式の印 
刷をイ可枚も行うことができます。 

また，印字開始位置の設定ですが，これ 
には パソコ ンから制御 コ ードを送る方法（プ 
ログラム例がマニュアルに載っています） 

と，オプションのフォーマットキーボード 
( FK -20 ) を使う方法があります。前者の 
方法は多少面倒なので，ここでは後者の キ 
ーボードについて説明し ます。 

このキーボードは書式の設定を簡単で確 
実に行うためのもので，登録した書式の記 
憶，呼び出し，修正などができます。設定 


门 j 東京部 f 代田区四番町2 1 

□ 

〔，>1 <株> B 本 V フト.ハンク 
rn oh!MZ 編集室御中 


邾 


〒()03 


字字 
字字字印印 
印印印角角 
角角角倍倍 
倍倍倍44 
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LPRINT"101 - - - - - - 

LPRINT"HL-6013”.. . . 

LPRINT" 2060 3 6”，- . 

LPRINT"’ 61 ハレ-観光ツアー 御一行"*-- . 

LPRINT" 2060 2 29 004 ”， . 

LPRINT" 2 0 6 0 4 16 "，一 . 

LPRINT •ルナステ ーシヨン 弊社尊用ボート ”’ . 

LPRINT ••連邦法第 15 〇条第 2 項準挺 "’ . .. 

LPRINT” 2 0 6 0 年 4 月 3 0 日 ”’—— . . . 

LPRINT" e$ 2 0 7, 000 ".- 

LPRINT” 苷及型 6 人乗り シャ トル MZ turbo"' - 

LPRINT" 1 128,000 12800 

LPRINT"Z8 エンジン用燃料 （ U-300 )”， - 

LPRINT" 12 4,800 5760 

LPRINT” 生命維持パック （ LS511 ド ’- 

LPRINT” 5 2.500 1250 

LPRINT” 乗 S 用ハンディパソコン (CZ-888C) "• - 

LPRINT* 5 980 490 

LPRINT" 音声合成，謀薄 ユニット (CZ-888V)" 1 —— 
LPRINT" 5 680 340 

LPRINT" 通訳ゾフト 「エスペラント j (JP5/V.2.2) 
LPRINT" 5 120 6 0 

LPRINT ""， . . ... . 

LPRINT. …- - 

し PRINT""' . . . . . 

LPRINT … - - - - 

LPRINT" 2 0 7 0 0 0 "， - 


100 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 


「書式印字のサンプル（見積書 ） j 
このようなフォーマットで見積書に簡単に印字ができます* 


の方法は，書式を設定したい用紙をプリン 
夕に入れて，キーボードの カーソル キーを 
押し，印字ヘッドを移動させながら各項目 
の印字開始位置に合わせて設定ボタンを押 
していくだけです。 

書式を設定したあとは，パソコンから印 
字データを送るだけで印字できます。はが 
き印字と同様に， BASIC ゃヮープロで作成 
します。 

◦総合評価 

最初に，このプリンタについて好感を持 
った点を挙げると，多機能の割にはコンパ 
クト (352 x 234 x 78 mm ) であること，また 
同じく 24ドットの漢字ドットインパクトプ 
リンタとしては安価であることなどです。 
機能としては，先に述べたようにメジャー 
なプリンタとコンパチなため使えるソフト 
が多いこと，はがき印字，書式印字といっ 
た便利なモードがあることが良い点です。 

逆に改善されるべき点としては，印字音 
があります。このプリンタ自体は比較的音 
の小さい方ですが，狭い部屋で使用したた 
めかなり気になりました。これは現在のド 
ットインパクト式プリンタの宿命でしよう。 
また，印字速度が遅くて高速モード（最高 
約30行/分）でも，大量の印字にはイライラ 
してしまいます。 

もうひとつは，書式印字モードは非常に 
便利なのですが，それをより活かすために 
用紙のセットをもっとしっかりできるよう 
にしてもらいたいと思います。本体付属の 
ペーパーガイドは支えが弱く，すぐにずれ 
てしまいます。せっかく細かい書式が設定 
できるのに用紙の位置が不安定では何にも 
なりません。オプションのオートカットシ 
一トフイーダーを使えば良いのかもしれま 
せんが，本体でももう少し配慮が必要です。 

最近は，いろいろなプリンタが安価で高 
性能になって発売されています。規格の統 
一が望まれながらも，なかなか完全にはで 
きていないようです。メジャーなメーカー 
のものに合わせていくといった，消極的な 
意味では多少は統一されつつある気もしま 
すが……。先ほども触れたように，ソフト 
側で多くのプリンタをサポートしていくと 
いう方向も当然あります力 ? ，せっかく良い 
プリンタが出ても自分のパソコンで使えな 
ければ困ってしまいます。これからはプリ 


ンタの規格も統一されていってほしいもの 
です。 幸いに して，私が使用している XI 
turbo や XI (F と NEW BASIC にイナ属），25 
00にはこうしたプリンタの状況を踏まえて， 
プリンタ設定が可能なユーティリティがあ 
るので困ることもなく新しいプリンタの発 
売は，周辺機器の選択の幅が拡がることで 
あり歓迎できます。 

Xl / turbo , 2500では，このプリンタを含 
めた NEC 系のプリンタも使用できますので， 
プリンタが欲しいと思っている方はそのこ 
ともお忘れなく。 （浅野恵造） 

定型害式印字 


サンプル2 



M -1024 P (本体） 128,000円 

FK -20 (キーボード） 29,800円 

PF -50( ピンフィードユニット） 5,000円 

第 2 水準 ROM ボード 20,000円 

オートカットシートフイーダー 20,000円 

(1 月末発売予定） 

ブラザー販売 ㈱ 0052(263)5811 


JI 兒捵咨 

様 


t*»n 


B 

«rnPia tS 



•♦ス f *- レ*ン mi 霉甩ボト 

遍 MdMl 弓 OM2 項攀㈣ 

2 01*0 隼41110日 




1234567 8- 

額額額額額額額額 

金金金金金金金金 


式〇日名日 偭価值 « 価 fi 価 ffi 

樣 N 月樣月日所法限額 mill 単車単単単単 
害書年意年期埸方期金 1\2\3\4\5\6\7\8\ 
播積行得会渡渡引効計要 M 要 M 要置要置要 M 要 M 要1;要置計 
見見発お照受受取有合逋数適数適数逋数適数適数適数適数合 


〇 〇 〇 


〇- 〇 
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MZ-2500, 
Xl/Xl turbo 

話題の拡— A モ y ボード 




最近，シャープの純正品以外の MZ - 2500用の拡張メモリボード，拡張ビデオ RAM ボード， 
大容量外部メモリボード， X 1/ X 1 turbo 用大容量外部メモリボードが相次いで発売されま 
した。純正品と互換性があり，しかも低:価格なこれらの RAM ボードは，ユーザーとしても 
見逃せないところですね0今回はその試用レポートをお届けします0 


MZ - 2500用各種メモリポード 

BASIC HOUSE から発売された増設 R 
AM ボード （ KGB -128 KMZ )， テ レ システム 
ズから発売の増設 RAM カード （ RM -25 A -2)， 
増設ビデオ RAM カード （ RM -25 A -1) ， 640 K 
B RAM DISK ( RM -25 E ) を紹介しまし 
X ?〇 

KGB -128 KMZ と RM -25 A -2 は，シャープ 
純正の拡張 RAM ボード （ MZ -1 R 26) とは 
少し形が違うだけで，機能的にはフルコン 
パチの128 K バイトメモリボードです。価 
格は， KGB -128 KMZ が12,800円， RM -25 
A -2 が12，100円ですが, KGB - 128 KMZ は 
BASIC HOUSE の5周年記念特別価格とし 
て現在9,800円で手に入ります。また ， R 
M -25 A -2 のほうは後述の RM -25 A -1 とセッ 
卜になった RM -25 A が24,800円です。いず 
れにしても，純正品 (35, 000円）の M ぐらい 
の価格です。実際 256 K ビットの DRAM が4 
つささっているだけなのに，純正品はどう 
してあんなに高いんでしようね。 

MZ - 2500の本体内スロットに実装してみ 
ると，いきなり BASIC のフリーエリアが約 
169 K バイトになりました。マウスや文節 
変換を使っても 153 K バイトあるのですから， 
安心して文節変換を使った大きなプログラ 
ムも組めるようになります。 

RM -25 A -1 は，シャープ純正の拡張ビデ 
才 RAM ボード ( MZ -1 R 27) と フルコンパチの 
64 K バイト V - RAM ボードです。純正品が 
20,000円なのに対してこちらは13,100円に 
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なっています。 

増設ビデオ RAM カードを装着すると，一 
気にグラフイック V - RAM が 128 K バイトに増 
え， 640 X 400 ドットの16色^^や 320 X 200 
ドットの256色表示が2画面など，16ビット 
機にも勝るグラフイック機能が実現されま 
す。また， MZ - 2500の BASIC ではグラフィ 
ック V - RAM をメモリディスク（メモリの 
一部を外部記憶装置のように使う）やプリ 
ンタスプーラ（バッファ〉として使えるよ 
うになっているので，派手なグラフィック 
を必要としない場合でも付けておいて損は 
ないと思います。プリンタスプーラとは， 
一般にプリンタの動作中のパソコン本体も 
それにお付き合いするために，動作終了ま 
でほかの仕事は何もできないという状況を 
打開するため，メモリの一部にプリンタの 
印字データを送っておき，それをプリンタ 
へ送りながら並列してほかの仕事を行える 
機能です。この機能を使えば長いリストを 
とっている最中でも BASIC のプログラムを 
作成したり，走らせたりすることができる 
のです。 

グラフイック V - RAM は 128 K バイトまで 
のメモリディスクとしても使えましたが， 

テレシステムズの大容量メモリボード RM - 
25 E (49,800円）はディスク1枚分の640 
K バイトの容量を持つメモリデイスク専用 
ボードです。こちらは純正品が出ていませ 
ん力' BASIC ， P - CP / M でサボートされてい 
ますので，安心して使うことができます。 

これを本体に装着するにはシャープ製の 


MZ- 2500用メモリボード 
増設 RAM ポード （BASIC HOUSE) 

KGB-128KMZ 12,800円 

(現在5周年記念特別価格9,800円） 
増設 RAM カード（テレシステムズ） 

RM-25A-2 12,100円 

増設ビデオ RAM カード（テレシステムズ） 

RM-25A-1 13,100円 

(RM-25A-1,2 のセツト RM-25 は24,800円） 
640KB RAM DISK (テレシステムズ） 

RM-25E 49,800円 

X1/X1 turbo 用メモリボード 
512KB RAM DISK (テレシステムズ） 

RM-X1E 49,800円 

SUPER RAM BOARD (デジツク） 

MB-1000 99,800円 

く問い合わせ先〉 

BASIC HOUSE S0286(33)1994 

梅)テレシステムズ S06 (631) 0925 

㈱デジック ©0899(24)0914 


拡張ユニット MZ -1 U 09(9, 000円）が必要で 
す。このユニットの本体側のコネクタはド 
ライブの隣りの奥まったところにあり，惯 
れない人には取付けが非常に難しいと思わ 
れます。この程度の価格で出せるのですか 
ら，ぜひとも標準装備にしてほしかったと 
思います。 

では，実際に使ってみましよう 。 RAM 
ディスクを使うための命令力 5 ' BASIC 上に用 
意されています。キーワードは “ EMM :”。 
Xl/Xl turbo と同じですね。フロッピーディ 
スタに対する命令はすべて “ FD :” の代わり 
に “ EMM :” を使うだけで RAM ディスクに 
対する命令となるのです。 RAM デイスタを 
使うには，まず INIT “ EMM : ” を実行し R A 
M ディスクを 初期化し ます。そして，たと 
えば RAM デイスタ上にランダムアクセス 
ファイルをオープンしたければ 

0 PEN “ R ”， # 1， “ EMM : ファイル名” 
とすればよいのです。同様にフロッピーの 
内容をすべて RAM デイスタに移すには本 
体付属のユーテイリティ“フォ ー マット& 
コピー”を使えばよく， CHDIR ‘‘ EMM : ” で 
カレントデイレクトリが RAM ディスクに移る 
といったようにいたって簡単に使えます。 

し力 1 も，相手は RAM ですからフロッピーデ 
イスクに対するときとは比べものにならな 
いほど高速に（約10倍）書き込み/読み出 
しができるので，プログラムやデータのセ 
ーブ/ロード時のイライラは完全に解消さ 
れるのです0ファイル処理をよく行う人に 
はかけがえのないものといえるでしよう。 




















不満といえば， MZ - 2500に付属のコピー 
ユーティリティがいさ さか 使いにくく，デ 
イスク 1枚分を EMM に フル コピーするの 
に1分ほどかかってしまいます。 EMM を有 
効に活用するためにも，高速のコピー ユー 
ティ リ ティなどが欲 しかったとこ ろです。 

この RAM デイスタは， P - CP/M 上でもド 
ライブ名“ F :” としてすぐ使えるようになっ 
ています。 CP/M などの DOS では， BASIC 
に比べてディスクアクセス回数がかなり多 
いので，この RAM ディスクを使用すれば， 
フロッピーディスクの 摩耗 防止だけでなく， 
アクセス 時間 待ちのイライラ解消にもなり 
ます。 XI と CP/M でプログラム開発などを 
してる人が EMM を有効活用しているのを 
見ても，その威力のほどがうかがわれます。 

このように ， RAM デイ スタは フロッピー 
ディスタの代わりどころかそれ以上の可能 
性を秘めたボードといえます。あとは，優 
秀なユーティリティソフトと電池などによ 
るパ、 ック アップがあれば，完全に フロッピ 
ーディスタと置き替わる こ とができるので 
はないでしょうか。 

なお，上記の各種メモリボードは MZ -80 
B / 2000モードでは使用できません。 

(吉田幸一） 

Xl/Xl turbo 用外部 RAM ボード 

すでに広告や本誌85年10月号の情報コー 
ナーでご存じでしょうが SUPER RAMB 
OARD ( MB -1000) がデジッタから99,800円 
で発売されています。容量は 1 M バイト= 
1024 K バイトと， EMM (シャーフ 。 IS 320 KB 
外部メモリ CZ -8 EM ) の3枚分 + 64 K バイ 
卜となっています。機能は EMM と完全に 
コンパチブルです。以下に付属のユーティ 
リティソフトなどとともに見てみましょう。 

MB -1000 は CZ -8 EM 3 枚分とコンパチブ 
ルです0 CZ - 8 EM にはデ、 イッフ 。スイ ツチが 
付いており， EMM 0: 〜 EMM 64: まで (BAS 
1 C でのサポートは EMM 0: 〜 EMM 9:) を選択 
できますが， MB -1000 では2とおりの設定 
だけしかありません。すなわち， EMM 0: 〜 
MB - 1000に同桶のユーテイリテイ 


Bin* 

"1：MBTEST . 

91 

Bin* 

• ， 1:MBTRANS . 

It 

Bin* 

H 1 ： LPTUTY(E600). 

If 

Bin 本 

”1:LPTUTY(D600). 

1 曹 

Bin 本 

，， 1:LPTUTY(C600). 

VI 

Bin 本 

”1:SEARCH & SORT. 

IV 

Bas 

"1 ： S&S TEST' . 

If 


EMM 2: に割り当てる力*， EMM 4: 〜 EMM 6: 
に割り当てるかです。そのほかの細かい設 
定はできませんが，実際に使ううえでの不 
都合などはないでしょう。ハードの点でほ 
かに書くべきことは，余っている 64 K バイ 
卜分へのアクセス方法ですが， EMM 0: (も 
しくは EMM 4:) からは，なんと 1 M バイトを 
そのまま使えるようになっています。 

では付属のユーテイリティについて紹介 
しましょう。付属のユーテイリティは4種 
類，7本あります（図)。 

まずは“ MBTEST ” で，これは MB -1000 の 
動作テスト用ユーティリティです。 1 M バ 
イト全体に対して，書き込み，読み出し， 
比較を行います。 

次に“ MBTEST ” ですが，これは EMM と 
ほかのデバイスの間でデータ転送を行うも 
のです。各デバイスと方向は 

① フロッピーディスク ^EMM 

② グラフイックメモリ ㈠ EMM 

③ EMM ㈠ メインメモリ 

④ EMM ^EMM 

が選べますが，残念ながら②〜④は XI tu 
rbo でしか動きません。また，方向やデバイ 
スの指定は POKE 命令で指定しなければな 
らず，エラーが発生した場合のエラーコー 
ドも PEEK 命令で読み出さなければなりま 
せん。マニュアルではその方法をちゃんと 
説明してあるのですが，やはり BASIC によ 
る サンプル プログラムぐらいあってもよか 
ったのではないでしょうか。ユーテイリテ 
イとしてユーザーが自作したプログラムと 
リンクする場合には特に問題があるわけで 
はありません力へ少々不親切な気がします。 

次に“ LPTUTY ” ですが，これはいわゆる 
プリンタバッファ機能を実現するソフトウ 
エアです。 BASIC を書••き換えて， LLIST ， 
LPRINT，HCOPY の 3 つの コマンドについ 
てプリンタバッファ機能をもたせるもので, 
これによってプリントアウトの間 CPU 力 ? 待 
たされることがなくなり，作業効率が上がり 
ます。ただしこれは CTC が必要なため tur 
bo BASIC 専用です。しかし，これはマニュ 
アルには書かれていません。誤解を避ける 
ためにぜひとも明記しておいてほしいとこ 
ろです。 

バッファには EMM 0: 〜 EMM 9:， V - RAM の 
M (バンク 1) を指定することができます。 
バッファ機能を無効にすることも CALL 命 


令で簡単にできますので，プリントアウト 
が多い作業には有効でしょう。 

最後に “ SEARCH & SORT ” ですが，こ 
れも turbo 用です 0 機能は VDIM で宣言した 
配列に対して高速検索，高速並べ換え（ソ 
一卜をするもので，これには BASIC で書か 
れた コントロールプログラム 例 力す付いてい 
ます。使い方は少々複雑ですが，実数デー 
夕のソートも可能ですから，使いこなすこ 
とができればなかなか強力な ツールになる 
でしょう。 

以上，このようなボードにユーティリテ 
ィが付属していることはたいへん評価に値 
しますが，細かいことを言えば，特に XI ュ 
ーザーには少々もの足りない気がします。し 
かし， CZ -8 EM が1枚88,000円であることを 
考えると，3枚分が99,800円と40%以下の値 
段で出てきたのは嬉しい限りですね。 

次に紹介するのは，本誌85年11月号の情 
報コーナーでも紹介されたテレシステムズ 

の XI 用 512 KB RAM DISK ( RM - XlE ) です。 
これは EMM + 192 K バイトの機能と ， PROM 
(BASIC ROM に対応）ボードの機能を1枚 
のカードに納めたもので，価格は49,800円 
です。 EMM のア ドレスは ディップ スイ ッチ 
により EMM 0: 〜 EMM 15: まで選択でき，ま 
た PROM のア ドレス も 0 E 00 h 〜 0 E 03 h だけ 
ではなく，指定された部分のパターンカッ 
卜，接続で 0 E 04 H 〜〇 E 07 h に変更することも 
可能です。 PROM は付属しておらず，自分 
で PROM ライタを使い書き込むなどして使 
うためのものです。 

EMM 部へのアクセスは 0000 Oh 〜 7 FFFF 
h までのアドレスを指定すること力呵能で， 
そのようにすると 512 K バイトをすべて使う 
ことができます。 

やはり気にかかるのは容量が中途半端な 
点で， 256 K ビット RAM を使っているためな 
のでしようが，どうも 192 K バイトが無駄に 
なってしまう気がします。また， マニュアル 
には， 「 IPL スイッチを押したり boot 命令を 
実行すると」内容が消えると書いてありま 
すが，そんなことはないはずです。 

以上，2つのボードについて書きました 
が，まさに DRAM が安くなっているという 
状況を表しています。この調子でいけばひ 
よっとして，フロッピーディスクは単なる 
バックアップ用のデバイスにすぎなくなる 
のかもしれません。 （高野庸一） 
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シャープからポケット DB インタフェイ 
ス （ MZ -1 E 25) が発売されました。これ 
はシャープの電子メモ，愛称ポケット DB 
(データベース）と MZ -1500 の間で住所録の 
データをやりとりするためのインタフェイ 
スです。価格は9,980円で，これはパソコ 
ンのデータ入力方式に新しい風を吹き込む 
ものとなりそうです。 

電子メモとは7 

電子メモとは，ひと言で言うと，電卓にア 
ドレス帳の付いたようなものでしようか0 
もちろん，ただのアドレス帳ではなくて， 
サーチ機能や自動ソート（名前を五十音， 
アルファベッド，数字，記号の順に並べる） 
機能も付いていて，しかもパソコンと通信 
ができるという優れ物です。 

容量は2 KB (ユーザーェリア1856バイト） 
のものと4 KB (同3904バイト）のものがあ 
り，名前4文字，電話番号12桁を入れた場 
合，前者で150人分，後者で320人分のデ 
ータが入ります。名前の部分には他の文字 
データ（住所など）が80文字まで入ります 
が，これを入れた場合はもっと人数が少な 

電子メモの価格 

PA -300(2 KB ) 13,800 :以下 （） 内は実装メモリ 
PA -300 D (2 KB ) 19,800円：本皮手帳型ケース付,ゴールド仕様 
PA -30 I (4 KB ) 17,800円：今回紹介のもの 
PA -302(2 KB ) 15,800円：本皮手帳型ケース付 
CSI 咖 D (4 KB ) 60,000円：音声時計内蔵.本皮手帳型ケース付 


くなります。 

使える文字はカタカナ，アルファベット 
(大文字)，数字，そして若干の記号（一，〒， 
/， ：，*，スペース，「」 ） です。カナの 

入力はローマ字カナ変換方式で行います。 

機種によっては電卓機能の他に，ポヶコ 
ン機能の付いたものがありますが，今のと 
ころ通信できるのは TEL モードと呼ばれ 
るアドレス帳のデータに限られています0 

MZ -1500 との接続方法 

ポケット DB インタフェイスは MZ -1500 
のデータレコータ''端子に接続します。その 
ため， MZ -1 500内部のジョイントコネクタ 
を取り外す必要があります（データレコー 
ダを使用し，すでにジョイントコネクタを 
外してある場合はこの作業は不要です）。 

ジョイントコネクタを取り外したら，ポ 
ケット DB インタフェイスの MZ -1500 側の 
コネクタを， MZ -1500 後面のデータレコー 
夕、'端子に， そして電子メモ側のコネクタを， 
電子メモの接続端子に接続します。 

接続は電源を切ってから，慎重に行って 
ください。また，接続中に MZ -1500 のカセ 
ットに対する命令を実行ずもと電子メモの 
データを破壊する恐れがあります。 

付属ソフトウェア•アドレスノート 

ポケット DB インタフェイスにはアプリ 


ケーシヨンソフト“アドレスノート”が付 
厲しています。電子メモとのデータ通信は 
このソフトを使って行うためのものです。 
アドレスノートの主な機能を挙げ•ておきま 
す。 

OQD へのデータの SAVE 
〇 QD からの データの LOAD 
〇 個人 データの 入力 

個人データ255人分入りますが，電子メ 
モの容量を越えては転送できません。 

〇データの 一覧表表示 
電子メモと同じく，五十音，アルファベ 
ット（大文字)，数字，記号の順にソート 
します。 

〇 個人データの表示，変更，削除 
〇サーチ 機能 
〇 プリンタへの印字 

個人データをダイレクト メール 用ラベル 
形式に印字することも可能です。 

〇電子 メモとの データ通信 
MZ -1500 から 電子 メモへ 通信す る 場合， 
電子 メモ 上のデータは消されて ， MZ の 
データが新しく入ります。このとき，転 
送するデータを指定できます。また，サ 
ーチ機能と組み合わせて，ある文字を含 
む名前のデータだけ転送す る こともでき 
ます。また，電子メモから MZ -1500 に転 
送す る 場合は， メモリ 上のデータに電子 
メモの データが追加されます。通信に要 
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する 時間は，最大約1分です。 

アドレスノートでは，操作の指定はすべ 
て フアンクションキーで 行い，どの フアン 
クションキーに どの操作が対応するかも 常 
に 画面に表示されますから，マニュアルが 
なくても簡単に使えるようになっています。 
また，個人データやサーチするデータの入 
力には，カナ入力とローマ字入力を切り替 
えて使うことができます。 

ア ドレス ノートが入っている QD の B 面 
には サンプルの 住所データと，ユーティリ 
ティソフトが入っています。これは MZ -15 
〇〇本体付属の住所録ソフトのデータを，ア 
ドレスノートで使えるように変換するため 
のプログラムです。 

街に出よう！ 

電子メモと MZ -1500 をつないで，デー 
夕の やり取りが できるようになると，そこ 
には様々な 使い方が生まれてきます。デー 
夕は何も住所，氏名，電話番号に限る必要 
はまったくないのです。さて，あなたなら 
何を入れてどう使いますか？ 

たとえば，次のような使い方は どうでし 
ょう 力、 。 

メモ帳代わりに 

あなた 力 ? ，街の ポスター あるいは電車の 
中吊り広告で マイ コンショウの開催を知っ 
たとします。いつ？どこで？ 普通なら， 
手帳を出して メモす ると ころですが， あな 
たは違います。さっとポケット DB を 取り 
出し，キーをたたきます。 まわりの人が， 
おや？とあなたを見ます。 金&筆で書く の 
と 違って， 間違っても消しゴムでゴシゴシ 
やる必要はありません。チョンと キーを押 
し，カーソルを 戻して訂正。実に スマート 
です。 

おもしろそうな本や映画の題名，バーゲ 
ン情報等々，街には情報がいっぱいです。 

あんなこと，こんな こと，すべて メモし 
ておいて，部屋に帰って MZ につなぎ， 即 
プリントアウト。きれいな文字が残ります。 
タウン情報 

ぴあ（関東）や L マガ（関西）片手に歩 
くなんて，かっこ悪い。ポケット DB なら 
MZ に入れたタウン情報のうち，必要なも 
のだけをサーチ機能で取り出して転送。今 
日は新宿，明日は難波， DB 片手に行って 

らつし や一い 0 


時刻表 

といって，街に出たのはいいけれど，は 
しゃぎすぎて，あれ，終電何時だっけ？ 
こんなことのないように，ちゃんとメモっ 
ておきましよう。 

スケジュール表 

ソート機能を利用して，便利なスケジュ 
ール表ができます 0 

MZ -1500 の側で月/日/時/分という名 
前で各スケジュールを登録します。この場 
合，数字はすべて2桁にします。1月1日 
なら01/01です。こうすれば，ソート機能 
であとから追加しても自動的に並べ替えら 
れます。そして必要な（この先1週間なら1 
週間分）データだけをポケット DB に転送 
します。 

日記にもなる！ 

何かあったら，すぐポケット DB に書き 
込みましよう。帰ったら，すぐに MZ に転 
送。日記専用の QD を作っておけば，追加 
された分だけ書き変わりますから，とても 
便利です。しかし，日付を2桁で入れるこ 
とをお忘れなく。 

パソコンの外部入力装置 

ポケット DB をバソコンの外部入力装置 
として使いましよう。しかし，現在その 
入カデータは住所録以外のデータとしては 
使えません。何らかのコンバートプログラ 
ムが必要です。コンバートプログラムがあ 
るものとして，以下の記事は読んでくださ 

い。 

プログラムの入力 

通勤，通学の電車の中で，あなたは何で 
時間をつぶしていますか？ 本を読む人， 
貴重な睡眠時間にあてる人，様々ですが， 
この時間をプログラムの入力に使うことが 
できるとしたらどうでしよう。通勤，通学 
の時間は短いようで，毎日積み重なれば長 
いものです。打ち込みたいプログラムがあ 
るんだけど，忙しくてそんな時問がない。 
そういうときに，このポケット DB で少し 
ずつ打ち込んでいくことができれば素晴し 
いですね。 

ワープロに使う！ 

電車の中で ふと 浮かんだ名文句を チョン 
チョンチョンと 打っておき，あとから ワー 
プロで漢字に変換す る。 俳句 や 和歌，詩が 
思い浮かんだらすぐに打ち込む。アイデア 
がすぐ文字になるなんて，素敵ですね。あ 


ら ゆる場所があなたの書斎になります。 

今はポータブルワープロが全盛の時代で 
すが，気軽に持って歩くには，いまいち大 
きすぎますね。その点，このポケット DB 
ならシャツのポケットにもすっぽり。 2 KB 
の容量を多いと見るか，少ないと見るかは， 
あなたの文才次第です。 

現在， MZ -1500 用の ワープロ，ユーカラ 
jj の外部入力装置として使えるよう，デー 
タコンバータを 検討中です。機会があれば, 
発表したいと思います。 

通信新時代に向けて 

パソコンと通信可能なポケット DB の出 
現は，新しいメディアの先駆けとなるかも 
しれません。近い将来には，街のあちこち 
で端末にポケット DB につないでは，デー 
夕をやりとりする風景が，当たり前のこと 
になって いるで しよう。 

そうなれば，あなたが毎月（毎週）買っ 
ている雑誌の情報なんかは，簡単に手に入 
れることができるはずです。 

今日はポケット DB をメモ代わりにして， 
せっせと情報を 書き込む ことをお薦めしま 
したが，こうなると書き移す手間がなくな 
って， 街のあちこちの端末につないでは， 
あっちの映画情報，こっちのアルバイト情 
報と，次から次へと新しい情報が得られる 
はずです。 

そして，もっと進歩してくれて，サイズ 
はそのままでもメモリが大幅にアップして， 
さらに 街の公衆電話から，いとも簡単に自 
分の部屋の パソコンなんかに情報を送り込 
めるようになってくれれば，きっとライフ 
ス タイルから変わってしまうかもしれませ 
んね。 

たとえば，毎日読んで いる新聞なんかは， 
写真まで見ることができない にしても， そ 
の日の情報が，次から 次へと24時間， 街の 
端末から提供されるとなればいったいどう 
なってしまうのでしよう0 テレビやラ ジオ 
という，現在の電波メディアの在り方すら 
変わってしまうかもしれない大事件にもな 
りかねませんね。 

それにしても，数年前にウォークマンが 
流行したときと同じように，今度はヘッド 
ホンの代わりに，街のあちこちでポケット 
DB を手にしている姿を，想像するだけで 
も楽しいことですね。 
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このインデックスは，タイトル，注記 —— 著 
者名， 誌名，月号，ページから構成されていま 
す。今月は MZ - 2500関係の紹介記事が多いよう 
です。 


I / O 工学社 

ASCII アスキー 

テクノポリス徳問書店 

Pio 工学社 

P 0 PC 0 M 小学館 

マイコン電波新 M 社 

マイコン BASIC Magazine 電波新聞社 

マイコンライフ学研 

LOGIN アスキー 



『バソコンで VHD を楽しむ本』というたい へん 軽い夕 
イトルであるが，中身はきわめてテクニカルな内容の本 
である。 VHD およびバソコン - VHD インタフェイス関係の 
技術資料をひとつにまとめたものといえよう。現在 ，V 
HD についてこれほど詳しく害かれた本はほかにない。内 
容は大きく，① VHD の仕組み，② VHD 言語，③ VHD 活用 
法，に分けることができる。①は VHD システムの原理を 
中心にした技術解説である。②は VHD 言語の仕様や使い 
方について詳しく解説されている。現在 VHD 言語による 
プログラム開発環境はユーザーには提供されていないの 
で，これは将来のためのマニュアルと見るべきであろう。 
③はユーザーがもっとも関心のあるところである。 Oh ! 
MZ 85年10月号で紹介した VHD インタフェイスユニット 
VO -20 PC を中心に，これの使い方や一般の VHD ディスク 
を使ってのサンプルブログラム（ XI 用）が紹介されている。 
全体に専門的な内容であり，どちらかといえば 「 VHD シ 
ステムのすべてがわかる本 j ということができる。 （ N . N .) 
バソコンで VHD を楽しむ本 
日本ビクター平田渥美著 

工学社 B 5 判216ページ2,500円 »03 (375) 5784 



►あれば便利な小道具大道具 

一気一気で整理整頓をしてしまおう！そのためのツールを君に教えちゃおう。 —— 
* 山学，マイコンライフ，12月号， l8-24pp. 

►中古市場に注目！！知らないと損する中古品入手のコツ 

中古パソコンなんて，と言う前に知っておけば便利な中古品購入術について。 —— 
藍澤公平，マイコンライフ，12月号， 50—55pp. 

►この許せない話 

もっとメーカーはユーザーサイドに立ってくれ，というお話。皆さん怒りましよう。 

- ピーターパン富野，マイコンライフ，12月号，60 — 61pp. 

► 中古バソコン学のススメ 少ない予算をフル活用する 

ワンランクアップを図ることができる中古パソコン購入学。 —— 安藤欣太郎，マイ 
コン，12月号，311— 314pp. 

►購入&買い換え大作戦 

必ず成功する，というパソコンの購入，貢い換えのテキストです。 —— 編集部，テ 
クノポリス，12月号， 76—82pp. 

MZ80K/C/1200/700/1500 

MZ-80K/C/1200 

► UFO GAME 

UFO を操って， P を取るゲーム。 一 しんちゃん先輩. Pio, 12月号， I24p. 

► いないいないバア~ 

地面の色をかえていくというワンキー垛作のゲームです。 一 てつろうくん，マイ 
コン BASIC Magazine, 12月号. 87p. 

►ザ*カラテ2 

格闘技ゲームです。燃えてください。^ — 宇都宮伸吾， Pio, 12月号， 82-9 Ipp. 

► TENSION 

あなたはガンマン。家の中に隐れている悪党共をやっつけてください。 —— ELECT 
RINSE, Pio, 1 2月号，124 -125pp. 

MZ-700 

►ゼラートル 

ゼラートルという怪物を倒すロールプレイ•ゲームです。 —— 平井真二， Pio, 12月 
亏，33 — 35pp. 

MZ-1500 

►ト リ サン mkl’s アルバイト 

アルバイトを探すトリサン mkl の物語です。 一斎藤将 之，マイコン BASIC Maga 
zine, 1 2月号， 92—93pp. 

MZ-700/ 1500 

► OTTA & TOTTA 

トッ タクンに幅子を取らせるゲームです。 -— 小檑利顕，マイコン BASIC Magazine, 
12月号， 90- 9 Ipp. 

►バスケットポール • ゲーム 

コンピュータと一対一のバスケットゲームです。 —— 吉田拓.マイコン BASIC Ma 
ga zine, 1 2 月号， 88—89pp. 

MZ - 的 B/ 200 0/ 没 00/2500 

MZ-80B/2000/2200 

► ダブルポール 

2つのボールをそれぞれ受けとめてください。 —— 猫のチュー公， Pio, 12月号，125 

一 126pp. 

MZ-80B/ 2500 

►ゼッタ ー2 

迷路の中にあるドットをすべて取るのだ。 一 黒武者健一. Pio, 12月号, 92 — 99pp. 
MZ- 2200 

►キヤリング フルーツ 

たかチヤンを操作して，リンゴを4個すベて，小屋まで運べば丨面クリアです。 一 
児玉忠士，マイコン BASIC Magazine, 12月号. 99-100pp. 

MZ-2000/2200 

► C • GRACE 

バグ•プログラムの訂正と CG データ。 —— 編集部，テクノポリス.12月号，122— 
132pp. 

► CANDIES PANIC 

キャンディが溶ける前にすベて食べてしまうゲームです。 一一 登坂裕之，マイコン 
BASIC Magazine, 1 2月号， 96—98pp. 

MZ-80B/2000/2200 
►不老長寿の林桷 

リンゴをパクパク喰べたら，悪魔がやってくるゾ。 —— 小畑健一，マイコン BASIC 
Magazine, 1 2月号， 94—95pp. 

MZ- 2500 

► NOBO 

スク□ールの滑らかなシューテイング•ゲームです。 —— エンジンルーム K.S，I/O, 
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12 月号，247 — 260 pp . 

► MZ - 2500全回路図 

全回路図公開。 - 編集部， I / O , 12月号， 329—349 pp . 

►プリンタ便利化プログラム4 

プリンタ関係のユーティリティブログラムを紹介する。 
フ，12月号，104— 109 pp . 

►スーパー MZ の内部解析 

BASIC M -25 についての内部解析 —— 高橋雄一，マイコン, 


-野瀬忍，マイコンライ 


12月号，217— 223 pp . 


—— 編集部， Pio , 12月号， I 70 p . 
編集部, ASCII , 12月号，2 16-217 pp . 


► MZ - 2500使用記 
MZ - 2500の簡単な仕様紹介です。 

► MZ - 2500ハードウェァ解説 
文字表示についてレポート。 一 

共通 

► ヒーロー 伝脱 

平和な国を取り戻すために，君が勇者となって バルー ドを倒すという ロールプレイ. 
ゲームです。 - 馬場光男， マイコン， 12月号， 282-288 pp . 

Xl/C/D/F/turbo 

XI シリーズ 

► DISK BACK UP MAKER XI 

プロテクトのかかつていないソフト，3インチ，5インチのメディア•コンバータ 
としても使える。 —— 竹谷康範， I / O , 12月号，29 Ip . 

► PCG エディタ 


• エディタです。 


-ゲツビ， I / O , 12月 


- ホーム コンビ 


ゲーム.プログラマのためのキャラクタ 

298—303 pp . 

►えっ！！ XI /turbo T 「ファミコン」 のプログラムが 作られる？ 

ファミコンと X 丨との組み合わせで作る風変わりな開発ッール。 

ュータ研究会，マイコン，12月号， 407-41 Ipp . 

►サーチ•ラブ 

チヤックンポップのようにペンタは愛のためにムッチャンの ハート を取り戻しに行 
くのだったあ一。 一 星合健二， P 0 PC 0 M , 12月号，179- 183 pp . 

トドロ ボー くん 

ドロボーくんの行く手を阻む悪魔達。お札を取って面クリア！ —— 石木宏明，マイ 
コン，12月号， 270」"274 pp . 

►サウンドポプ コム タッチの テーマ 

タッチのテーマ曲です。 —— 越姫優香， P 0 PC 0 M , 12月号，51 -52 pp . 

►スペースキャリア 

TAG を操作して，誘導ロケットを運び，スペースシップを惑星まで届けてください。 
-—Luck & Think , P 0 PC 0 M , 12月号， I 85— I 87 pp . 

►円丈のジヨ〜ダンソフト 

オトーサンをソウサして丨丁目の駅から4.丁目の自宅まで連れてくる，という単純 
なゲーム。——三遊亭円丈， P 0 PC 0 M , 12月号，107- II 2 pp . 

►マイコンビジネス BASIC 教室ランダムアクセスファイルの活用 

データベース型のファイル管理と.管理資料作成ブログラムについて。 —— 久安勝. 
マイコン，12月号，315 — 319 pp . 

►フアイアレスキャッスル 

姫を取り戻すために王子はファイアレスに乗り込むのだった。 —— 日野義政，マイ 
コン BASIC Magazine , 12月号，140— 142 pp . 

►水戸 黄門 

例によって，例のごとく助さん格さんは黄門様を守るのであった。 —— M . Y , マイコ 
ン BASIC Magazine . 1 2月号，138— 139 pp . 

► ギルミス 

ガルーダにさらわれた恋人を救うゲームです。 —— 内海達哉， Pio , 12月号， 36—43 
PP- 

►もくじけん 

少林寺の木人と戦うことになってしまった。 —— 足立博之， Pio , 12月号， I 27 p . 
►フレックス 

ギヤラクシアンタイプのゲームです。 

-127 pp . 

►忍カンタン改造法ギャラガ 

面進め&効果音遊びの隙しコマンド。 一ー ケン•パックマン，テクノポリス，12月 
号， 32 p . 

►忍カンタン 改造 法 ニュートロン 

フルーッひとつ取れば，面クリア。 一 えっくすわん Z , テクノポリス，12月号， 
32 p . 

► C • GRACE 

バグ•プ□グラム訂正， CG データ。 —— 編集部，テクノポリス，12月号， 122-132 
PP . 

►すぐに遊べるマシン語入門 

ゲームを作りながらマシン語に換えャゆく。ドライブゲーム編。 一 一岡田一星，テ 
クノポリス，12月号，110- 120 pp . 

►レーシングコンストラクシヨン 

コースを作って，さあ走ろう！ゲームです。——酒井潔，テクノポリス， 133-137 
PP - 


-プロッタプリンタあ， Pio , 12月号，126 


► SHARP XI 用 turbo LOGO 

漢字版ロゴについてレポート。 —— 編集部， ASCII , 12月号， 230 p . 

XI turbo 

►スーパーパソコン XI turbo II 新登場 

独創的なソフト2種が同梱されたハイコストパフォーマンスマシン ，XI turbo II に 
ついて。 一 岡本一郎，マイコン，12月号， 2 l 2-2 l 6 pp , 309 p . 

► Big New Products XI turbo model 31 & turbo LOGO 

ニューモデル 31 には画期的なソフト2槿が装備され，日本語処理機能がますます充 
実した。 —— 編集部， I / O , 12月号， 243 p . 


ポケコン 


PC - 1245 

► PC - 1245モニタ 

8バイト，4バイト単位のモニタチェックが出来ます。 —— 渡辺学. P 0 PC 0 M , 12月 
号，131 — 132 pp . 

► ロイヤルボーカー 

ポーカーゲームです。 - 高橋裕， Pio , 12月号， I 50 p . 

►基参りゲーム 

墓場のお化けにメゲずに宝を奪え！ —— 辻，清水. Pio , 12月号，148— 149 pp . 

PC - 1245/51 
►まくら投げ 

先生の言いつけは槳直に破って，夜は楽しくまくら投げ！ —— 綾部鉄之介，マイ 
コン BASIC Magazine , 1 2月号. I 46 p . 

PC -1251 

►スクランブル 

障害物をよけるスクロール•ゲームです。 —— IKSU , Pio , 12月号，134— 135 pp . 
►蚊スペシャル 

蚊を叩きましょう！ —— 皿海みつる， Pio , 12月号， I 33 p .- 
►ザ•モグラ 

モグラ叩きゲームです。 一 伊藤正明， Pio ， 12月号，136 — 137 pp . 

►ボケコンワード•ジェネレータ 

ポケコンの IB 出力を利用した4チャンネルのミニ.ワード.ジェネレータを製作 
する。 —— サタンゴースの息子マッドギャラン， I / O , 12月号， 224—227 pp . 

►ヒデちやんスイマー 

川の中をスイスイ泳ごう。障害物には気をつけて。 —— 栗生沢寿郎， P 0 PC 0 M , 12月 
号，1 34—135 pp . 

►ポケコン • デジポル 

0 P アンプを使ってペン 害き レコーダの代わりに，時間を横軸にとり，電圧の変化を 
記録するものです。 —— 前原秀明， I / O ，12月号， 228-229 pp . 

PC -1245/50/51/55 

►スネーキー 

大蛇が群れをなしてやってくる。ビーム砲でやっつけよう。 一 turbo くん， Pio , 

12月号，146— 147 pp . 

PC-1261 

► 10 X 14 ドット • キャラクタ出カルーチン 

そのような出カルーチンです。 —— 某中在 GON , Pio , 12月号， I 43 p . 

PC -1270 

►らんだむふぁいる 仕事に 合わせてソフト選びボケコン PC - I 270 
仕事に合わせて ROM 力ードの交換によってプログラムが使用可能なプログラム実行 
専用のボケコン PC - 1270を発売。 —— 編集部， P 0 PC 0 M , 12月号， I 02 p . 

PC -1350 

► ベースボール • ジャンケン 

野球拳です。 —— 3 A 3 U , Pio , 12月号，138— 139 pp . 

►ハンブンストンウェル物語 

黒玉，セスナにぶつからないようにロケットを移動させてください。 —— ニョンタ， 

Pio , 12月号,140— J 4 lpp . 

► 惑星破壤ミサイルを迎擎せよ 

3- D ワイヤーフレームによる迎擎ゲームです。 一 木本ごう， Pio , 12月号，142 
— 143 pp . 

►ポータブル•ヤキュウケン 

野球幸です。 一 Tk-SOFT KATAE 俊 行 • Pio , 12月号，144 一 145 pp . 

► PC - 1350情報 

アドレスについての情報と PC - I 350 と PC - I 40 I パスワード表示プログラム——清水 
徹， P 0 PC 0 M , 12月号， I 33 fi 

► 上 • 下スクロール 

上•下スクロールプログラムです。 —— アパラチア.モドキ， P 0 PC 0 M , 12月号， 
I 34 p . 

►ランデイング，シミュレーション 

フライト•シミュレーターです。 RAM カード要。 —— チェスナット原,. I / O , 12月号， 
310—31 Ipp . 

PC - 1500 

►キッチンクルクル 

キッチンにあるものが，日頃のうらみを込めて攻めてきた！ 一 すっさん，マイ 
コン BASIC Magazine , 12月号， I 47 p . 
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アスキー ¥107 , 巷 区南青山5-丨卜5住友青山ビル 003(486)71 II 
㈱ アテック ¥.550 大阪市西区南堀江卜丨卜丨 006(543)4051 
咮 アバロン 》?150 渋谷区桜 か 丘 町 8-17 シャーレ渋 谷 A 楝102 «03(476)0187 
ア匕 コン 590堺市錦野町東卜卜6 150722 (68) 3399 

池上 通商物 WI 0 I 千代田区外 神 田 3-7- 14 中部ビル 003(257)1685 
物インテック 甲 151渋谷区轜ヶ谷 3-37-18 003(320)21 10 
ウ ェッシソフト 哂581 大阪府八尾 市中田4 125 I 00729 (9 1)6446 
㈱ ウス4 ハソコン センター<¥930富山市 総 曲輪 3-6-3 00764(21) 4181 
ウラカワ電器店 ¢863 熊本県 本渡市电場 町龜川 1693-丨009692 (3)2813 
エイト電氪柹 枣110台東 区 上野 5-3-4 003(831)5632 
㈱ エース軍務 憷¢,812 椹岡市 博多区 店屋 町 2-丨丨 0092(291)5587 
エデュ カ相 ® I 60 新宿 区内 肟町丨番地 三洋ビル 003(352)861 1 
㈱ エニックス ©160新宿区西新宿7 I - 6 003(366)4345 

エプソン販売相） 辱160新 宿区 西新宿2-4-丨新宿 NS ビル 私害 箱 6109 003(348)6801 

㈱ エムエーシーコンピュータ 事業部 蜃 530 .大阪市 北 区 曾根 崎 2 丁目 2-15 006 -315-0541 

応用電算技研(株） 办 810福岡市中央区 大名 2-6-1 福岡国際ビル 6 F 0092(715)2789 

㈱ 才才カト滋賀県 野 州 部野 州町小孩原 2114 00775 (87) 1215 

㈱ オーク V 6 I 5 京都市 西京区 川島有栖川町51オークビル0075 (391)0391 

オークシステムハウス ®772 徳島県 鳴戸市 mg 町斉田 字大提 18-6 008868 (6) 0105 

オーディオイワサキ ®073 北海道渑川市有明町 2 H -44 00125(24)8772 

オスコン電子 ㈱ ® I 50 渋谷区宇田川町4卜 I NHK 共同 ビル 003(462)5013 

加賀電子 ㈱ ， M 3 文 京区;赛島 3-14-2 0 03 (836)5161 

カスタムデバイス 社册323栃木県小山 市 城 東 4-9-24 00285 (25)3952 

キャリーラボ V .862 熊本市大江6 丁目 25-25 金子 ビル IF 0096(363)0211 

ゲンコウシステム開発部¢648-01和歌山県伊都郡 九度 山町九度山1580 0073654-2130 

㈱ 光栄¢223横浜市,隹北区日吉本町1876光栄ビル IF 0044 (61)6861 

I 株 j コスモスコンピュータ乎164中野区中野 5-52-15 中野ブ□ー ドウ ェイ 2 F 003(385)5388 

コスモス新潟 甲950 新潟市花園 卜 6-30 大幸ビル IF 00252(41)5721 

|有1コマキシステム研究所 辱 622西宮市松生町 14-18 150798 (72) 35 14 

i 株|コンピュータアプリケーションズ生産技術研究所 

¢101千代田区ーッ橋 2-3-1 小学館ビル 003(263)7241 
コンビュータシティ ®640 和歌山市 黒 田255-丨 00734(73)6553 

コンピュータビング 啄013 横手市八幡 石 町27 00182(33)4767 
㈱ コンブティーク WI 02 千代田区隼町 3-19 ; 湾 水ビル 4 F 003(234)8041 
咮ザインソフト 帝 676兵庫県高砂市米田町米田 M 62 -I 00794(31)7453 

堺教材センター 啄 590堺市榀屋町 4-2- 16 00722 (22)7148 

㈱ サムシングクット 费 160新宿区大久保 2-5-20 シティプラサ新宿 3 F 003(232)0801 

サンつサプライ ㈱ 用 700岡山市下 中 野80 卜4 00862(41)6336 

三和電子 ㈱ 5*173 板 樣区中九町 58-5 003(955)9231 

(tti シーティーエー 平 165中 ff 区野方卜 53-5 003(388)3521 

你シーレックスサンクラス >5910福井市二の宮5丁目 14-3 00776(25)2111 

㈱ シヱーディーエス也156世田谷区経堂2•卜26小田急経堂ビル623 003(428)3359 

扑システムサホート京都枣600京都市大京区西洞院四条下ル光悦ビル 2 F 0075(343)4728 

システムハウスコマンター W 46 I 名古屋市東区芳野卜 18-9 «052(932)1740 

システムハウス MASH 北川電子 负 471费田市若宮町5 47 110565 (31)7644 

妆シャノアール 甲 143大田区山王3-29-丨フルク山王 IF 003(778)0445 

正智塾 ㈱ ¥572蒋屋川市成田西町 6-30 00720 (34)6776 

新紀元社 9160新宿区新宿4-卜9新宿ユースビル 003(350)0848 

シンキンクラビット甲665兵廉県宝塚市中州卜 2-24-503 00797 (73)3113 

新電子システム物甲830福岡県久留米市通東京 3-4 00942 (39)2404 

故研钻 V 4 II 岡県三島市一番町 15-32 芹沢ビル 4 F 00559 (75) 1534 

スカ.ャ無線商会»416 A ? 岡県萬士市長通 104-3 00545(61)1417 

ストラットフォート ㈱ 甲336 ;南和市南滴和？- 36- 15 0 0488 (85)5222 

スヒタル産業 ㈱ ¥|〇|千代田区外神田卜16-丨«03(251)2918 

'有ソヒア 甲 101千代田区神田駿沔台 2-1 プラサお茶の水304 1503(293)9407 

ソフトウ I アインターナシヨナル ㈱ 甩107 ,菩区南胃山2 9 28 SI ビル003 (479)7151 

伤.ソフトエ学研究所 ¥ lpl 千代田区外神田 3-1 卜2 ロックビル 003(251)1195 

ソフト集団らくた甲720広島県福山市引野町 2- 194 00849(43)6565 

ソフトハウス BRAMS 甲丨77練馬区東大泉4 丁目 22-16 003(923)8352 

ソフトプ□ ㈱ ソフトプ□インクーナショナル事業部 

甲530大阪市北区西天,离 6-7-2 梅新東ビル 5 F 006(363) 1221 
物タイアモント社情報局 DSL 甲. 100千代田区！！が閗卜 4-2 003(504)6236 
你 タイエレクト□ニクス W 768 香川県18音寺市古川町切石211 »08752(5)1308 

タイナックス 印 336满和市北;甫和 4-5-8 吉田ビル00488 (32) 2356 
收高木字固 0 A テック甲444岡崎市上六名 3-13-2 00564 (53)9400 
チャンヒオンソフト枣530大阪市北区西天滿6丨12 006(365)9900 
ティーアントイーソフト 甲' 465名古屋市名柬区璺が丘1810 0052(773)7770 

テー クウエストジャパン 

甲556大阪市,良花区;皮中 2-7- 17 city 松本201 006(632)0937 

㈱ データポップ WI 07 ，巷区赤坂2 13-19 多聞堂ビル 4 F 003(584)1522 
デービーソフト ㈱ .甲060礼幌市中央区北三条西2丁目カミヤマビル SO II (251)7462 


や 


㈱ テクノソフト春857佐世保市福石町 4- 14 00956 (33)5555 

㈱ デジック也790松山市本町 6-6-7 口ータリー本町 IF 110899 (24) 0914 

テレシステムズ m 556 大阪市浪速区*美湏卜 2-5 006(631)0925 

天昇電子 ㈱ 迅101千代田区神田須田町卜 13-9 003(253)3947 

㈱ 東•:毎クリエイト蜃108港区三田3-卜7三田東宝ビル 4 F 003(456)4610 

東京電子科学機材 ㈱ ® I 0 I 千代田区外神田 2-2-12 神井ビル 003(257)1361 

南江堂 ¢113文京区本鄉 3-42-6 S 03(81 07234 

㈱ 日本コンピュータ設計 HM 50 渋谷区松涛卜 4-9 003(466)6101 

日本統合ソフトウ I ア ㈱ 辱102千代田区九段南 2-3-14 站国九段南ビル 7 F 003(263)2291 
日本システム管理 ㈱ ®8 I 5 福岡市南区向野丨丁目 19-8 0092 (51 06932 
日本フ F ルコム ㈱ ® I 90 立川市嗶町卜 19-3 00425 (27)4121 
日本マイコン販売 ㈱ ®530 大阪市北区中崎西卜 4-22 第8新興ビル 006(374)0849 
日本ユニバック情報システム牌) 0 A 事業部 
■ 107港区赤坂 2-17-22 赤坂ツインタワー本館 003(587)8111 
㈱ ニデコ ® I 0 I 千代田区神田松永町丨宮沢ビル 3 F 003(253)0761 
ノグチコンピュータサービス(株> 

®336 浦和市常魅 9-20-3 北浦和第2大栄ビル00488 (31)0108 
野島電携©670姫路市今宿 3-6-3 «0792(92)0647 
パーソナルメディア ㈱ ® I 4 I 品川区西五反田8-卜 II 003(490)8841 

㈱ パールビジネス暴600京都市下京区玟小路室町西入ルアネックス京都 7 F-B 0075(371)8321 
㈱ バスカル II - W .432 浜松市佐鳴台 4-9-10 00534(53)6186 
㈱ ばそる懋100千代田区永田町 2-4-3 永田町ビル IF 003(501)2181 
㈱ 服部セイコー電子懊器事業部 
¢-104中央区京樣 2-4- 12京橋第一生命ビル〇03(?7め2121 
ハネロン霣子工業 ㈱ 热581八尾市南木ノ本2-45-丨 00729(94)7778 

パル学習教室 ®530 大阪市彳ヒ区天;高卜 7-17 006(352)0427 
㈱ パルコ厶暴530大阪市北区梅田卜卜 3-900 駅前第3ビル 9 F 006(341)3422 
ビーピーエス ®22 l 憒浜市神奈川区西寺尾卜 20-12 渭水ビル 2 F 0045(421)7421 
ビクター'音楽産業 ㈱ ® I 50 渋谷区渋谷卜 7-5 青山セブンハイツ605 «03(486)9470 
福并コンピュータ販売 ㈱ ©910福井市二の宮 3-42-30 00776 (26)3430 
¢10菖士音 If マイコンセンター RAM 

¢•101千代田区外神田卜 15-16 秋葉原ラジオ会館 003(255)7846 
ブログラム企画サービス ㈱ 暴540大阪市谷町卜44大手前愛晃ビル 2 F 006(943)6344 
ボーステック ㈱ ©107港区南莆山 5-12-3-204 003(407)4191 
㈱ 北陸パイトショップ ®930 富山市五福五区3216 00764 (33)5176 
㈱ ホットビィ ® I 64 中野区東中野4-4-丨丸新ビル 5 F 003(360)3623 
㈱ ポニーポニカ企画部‘®102千代田区九段北4•卜3日本ビルディング003 (265)6377 
ポプコン 5 M 0 I 千代田区神田神保町 3-3-7 昭和第2ビル 4 F 003(263)6940 
マーベルコンピュータ想.673明石市西明石南町卜 10-13 0078(923)5536 
㈱ マイクロキャビン ¢510四日市市鵜の森卜 2-15 メゾンヴァンペール 2 F 00593 (51)6482 

㈱ マイク□ソフトウェアアソシエイツ 

«107 .巷区南育山 7-8-1 小田 f . 南莆山ビル卟 003(486)1411 
マイクロデータペースアソシエイツ磬 194-01 町田市 K 川2•.卜 8-205 00427(35)1600 
マィクロネット零064札幌市中央区南10粂西15 丁目ムラカミビル 3 F 0011(561)1370 
マイク□ブ□ジャパン眈嘢107港区南霣山 2-24-15 霣山タワービル 7 F 003(423)4901 
マイク□ボート想657神戸市激区船寺通り 5-3-8 0078(801)5181 

，ラント上田，386長野県上田市中央西卜 15-28 00268 (24)3515 
•センターウエノ W 420 S ? 岡県®匠 3-14-16 コハラビル 6 F 00542(47)621 1 
-システム企画大阪市東彳主吉区;赛里卜卜 I 稲田ビル403 006(704)9923 
コンハウスシナプス丨甲730広島市中区立町 3-19 きよめビル IF 0082 (245)8833 
ョッフ‘ BASIC HOUSE ¢320宇都倉市桜 3-2-17 太平ビル 00286(33) 1994 
㈱ マイコンハウス SPS 平960福島市太平寺町の内 5-3 00245(45)5777 
宮峠マイコンン3ップ¢,880宮蝻市宮協町 89-4 00985(27)4326 
㈱ ユニオンプランニング 

平141品川区東五反田5 28 9第3花谷ピル 3 F 003 (444)4161 
ユニバース W 700 岡山市下中野519-丨 00862(44)1176 
吉 I 工業 ㈱ 平992米沢市城南卜 6-24 00238 (21 )1 147 

㈱ ライフホート >5101千代田区神田锦町 3-6 003(293)4711 
㈱ ラウントシステム研究所用560豊中市上野西 3-2-25 S 06 (849) 6982 
リートレックス甲丨5〇渋谷区宇田川町 36-6 ワールト宇田川ビル 003(464) 1241 
㈱ リットーミューシック想160新宿区四谷 I 丁目5 新四谷駅前ビル 7 F 003(359)0266 
㈱ リバー匕ルソフトザ810福岡市中央区大名 2-10-4 シャンポール大名 B -202 «092(771)3217 
㈱ ローランドティージー I 株| ¢433浜松市茱丘町1006 -14 00534 (37)2333 
BIG HEAD 甲380長野市柳町76 00262(33) 1911 
CATS EYE CO . 想537大阪市東成区中道 2-5-15-51 丨 006(941)6379 
(咏 HA し研究所甲101千代田区神田涓田町 2-6-5 0 S ビル 003(252)5561 
い〇データ锻器甲9?0石川県金沢市 S 岡 7-22 00762 (21)4812 
Ml A 甩|5〇渋谷区渋谷 2-9-1 青山田中ビル 003(486)4500 
M . T . K 電子 ㈱ .甲660尼崎市昭和通四丁目120 006(413)0188 

㈱ SBC ソフトウ I アパソコン流通！* 60新宿区本塩町21木田键設ビル 5 F 003(353)9241 
SQUARE 哦223横;兵市， g 北区日吉本町丨 776-3 F S 044(63)620 l 
㈱ SSK オフィスコンピュータ ®792 愛媛県新居浜市繁本町 4-14 00897(32)3211 
STUDIO M 帝982宮城県仙台市金剛 2-9-27 〇0?22(45)3998 
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霧降高原から I ファジイのように風します 
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燃えるような紅葉の季節は終わり，霧降はもうすっかり冬です。 
今年の紅葉は例年にもまして色鮮やかで，それは素晴しいものでし 
た。東照宮界隈，いろは坂，中禅寺などの名所ばかりがきれいな 
のではありません。何でもないところ，フッと通りかかったとこ 
ろの 紅 や黄と常緑樹の緑，山を 眺めると 自然の削った モザイ ク模 
様。今年はこの美しさを存分に味わいました。早朝“ッナギ”を 
着てバイクで出かけたりしました。そうなんです！ ラッキーに 
もツナギが手に入ってしまったのです。友だちのお兄さんがクリ 
ーニング屋で縮められてしまったのを貰ったのです。それが私に 
ピッタリ。フフ，あったかいし，たとえ転んでも守られていると 
いう 安心感。それより，マシンと一体化して完璧にライダーにな 
ったんだ， という 気がして。嬉しくて，近くでもわざわざ ツナギ 
を着て います。でも， 町中では目立っ 
てしまって （そういう気 だけ？） 緊張 
してし まう。 

ところて‘「風します j という漫画知 
っ てます？『ビッグコミックスピリッ 
ッ』 誌に連載中の 4 コマ漫画です。女 
の人が描いているパ'イクコミックで， 

“月子さん”というズッコケライダー 
が主人公です。 思わずフッフと笑って 
しまったり，フームと感じてしまった 
りします。ちょっと前に「創世紀」と 
いう題のものがありました。「初めにバ 
イクがあった。犬，牛がまたがったが 
合わなかった。次に人間がまたがって 
ピッタリだったので，バイクは人間の 
ものになった」という 話です。 私はそ 
の話を読んで，バイクに乗れる人間で 
良かったなあ，と思った ものです。 人 
間って，素晴しくできて るんですね。 

それを改めてウーンと認識させてく 
れたのが，最近耳にするようになった 
“フアジイ理論”“フアジイシステム” 

です。 フアジイ （ fuzzy ) というのは， 
fuzz (けば， 綿毛） からきて「ぼやけ 

た，あいまいな j という意味です。この理論で，人間は，はっき 
りしない情報を もとに判断して行動で きる という素晴 しい能力を 
持っている，ということ に気づかされ ま した。 

いくら私のライデイング テクニックが 未熟だといっても，機械 
で バイクを運転するとしたら大変！ 諸々 の 要素があるんだと思 
いますが，状況判断 —— 行動ということを 考えただけで も，なん 
と複雑。 あいまいでしかも素早く的確なこ とをしている こと 力*。 
まず， 状況の情報を得る ための センサーが すごいんでしょうね。 
視覚だけだって，あちこち前後左右， キヨ ロキヨロいろいろなも 
のをと ら えて選別して 判断に導いている。道順，進路の決定，路面 
状況，周 II の 交通，標識など，結構 何気なくいろんな種類の こと 
を兒ています。おまけに右前方の:中:は初心者マークをつけた私の 


母ぐらいの年齢の人だから車間をあけて気をつけようとかも思っ 
たりしています。ただし 40km/h のときは停止距離 22m だから，あ 
と 3 m50cm 車間をあけなければ，なんてしていません。こういう 
交通状況のときはこんなもんだ，という大体の状況把握と経験で 
行動しています。「だいたい」というのは 細部の 情報にはまるで 正 
確さはないのですが，行動のもとになる全体的状況を素早くとらえ 
今んですね。コンピュータはきっちりしていて0，1の2進数の 
組み合せで情報処理しているから「だいたい」とか「〜ぐらい， 
という感じ」に弱かったんです。あるコンピュータ雑誌を見て知 
ったのですが，ファジィ理論を応用して地下鉄の自動運転シス テ 
ムや作業用ロボットが実月1段階に入っているんですって。ロボ ッ 
卜は，熟練した人間が経験から得て いる判断 行動を 規則化 して 「も 
し〜 であれば…せよ」としているそう 
です0 ところが「〜 j という筒所はい 
つも一定で あるわけはない。「だいた 
い」というあいまいさを持つファジィ 
集合なんだそうで，ファジィ推論でこ 
んなところだ，という具合にやらせた 
りするそうです。地下鉄自動運転シス 
テムなどは予見までするんですって。 
たとえば「快適に止まる」という目標 
があったら，現在速度の場合ブレーキ 
1回でこの距離で止まったらどうだ， 

3 回に分けたらどうだ，と予見させて， 
いちばん指示目標に近 t 、操作を最終的 
に行わせるそうです。なんと 0.1 秒ご 
とに最適な運転操作を決めているんで 
すって。でも•地下鉄は，他の交通がな 
いからできるんでしようね。なんだか, 
どんどん機械に人間の持つ「勘所」を 
教え込んでいるようです ね。 

ノぐイオテクノロジー，ノぐイオコンビ 

ュータ，人工知能などの研究が進み， 
先端技術ともてはやされたり夢を運ん 
だり，また一方，脅威を呼び起こした 
りしています。その開発 結果に 人間が 
征服され，支配されるようになったら 怖いけど，「スターウォーズ」 
の R2—D2 のよう に 頑固一徹な ロボ ツ トや C 一 3PO のよう にお調 
子 者のロボットがいたら面白いな。人間は自分の手助けになるも 
の，代わりになるもの，それ以上のものを 求め続けて いるんだ と 
思います。でも結局「人間とは何か」という哲学的命題みたいな 
ものに 帰しているんじやないでしようか。 

私は，最先端技術がもっとも古い学問と同じなのだ，という フ 
レーズを頭に浮かべながら寒い風の 中をバイ ク で， 無意識の うち 
に予見行動しながら走りました。山は白く なって います。暮れて し 
まうと，ツナギを着ていても風が突き刺さってきます。部屋に戻 
り 冷えた体を温めようと，白い コンピュータに 向き合いジョイス 
テイ ック を握り，ホットな気分になりました。 


A vImppY 
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10 INS=24 
20 INS=8 
30 INS=18 
40 CURSOR 38,24 
50 CURSOR 38,24 
60 CURSOR 0,0 
70 END 


80K/C/1200/700/1500 ノ 
80B/2000/2200 ノ 

HuBASIC 

: PRINT ，，八”； 

: PRINT CHR$(IN5 )； 


S-BASIC 

S-BASIC 


E 000 

E 008 

E 010 

E 018 

E 020 

E 028 

E 030 

E 038 

E 040 

E 048 


SUM : 



BASIC で座標 (39, 24) に文字を表 
示しだいのですが，どろしても改行 
されてしまってうま <いきません 。 「POKE 
SD 3 E 7, nj 以外に方法がないでしよろか。 
機種は MZ -1500 です。 

愛知県中野智之 

□ 画面の右下すみに文字を表示すると 
改行してしま^。誰にち経験のある 
ことてしよ^。これに対処するには，直接 
VRAM に書き込む手かあります。中野さん 
の質問中 POKE といろのがありますか，こ 
れかそ^てす。 MZ -80 K / C /1 200/700/1500 
ならこれてよいのてすが， MZ -80 B / 2000/ 
2200や XI シ 1 J ースては IN , OUT , POKE を 
使い，複雑な処理を してや 0) なければいけ 
ません。 

さて， U スト1のブ□クラムはもっと簡 
単に実現する方法てす。右下すみから1字 
左に文字を書き（これな5改行しない）同 
じ位置てインサートを行ろことて.先ほど 
書いだ文字をひとつ右へ送ってやれば完了 
てす。80字モードのときも同じ要領て (78, 
24) に書いてやればよいのてす。10行〜30 
行中の自分の機種か書いている行と，40行 
か570行を打ち込んて試してみて <ださい。 

E Oh ! MZ 84 年7月号にモニタの分離 
とその活用が出ていました。使用し 
てみてだいへんよかったのですが，画面が 
40文字になっていてすこし見づらいので， 
これを80文字で使ろよろにするにはどろし 
だらいいでしよろか。鳥取県植田操 



H 1 Z 質間箱 


□ 84 年7月号に載つたのは X 1につい 
ててすが，85年9月号には 「 S - OS 番 
外地 j に XI , MZ -80 B / 2000 /2200の モニタ 
の分離方法について書かれています。 

ます， XI のモニタか 1 580文字モードて使 
ろには，単に 「 G 098 C 」 だけですみます。逆 
に 40 文字モードにするには「<30998」てす。 

MZ -80 B / 2000/2200て80文字モードにす 
るには 0 C 7 Ch 番地, 40文字モードにするに 
は OCEEh 番地をそれぞれコールすればよ 
いのてすか，モニタからの J 命令は「ジャ 
ンブ」てあつて「コール」てはないのて，6 
ノ '(イトのブ□クラムを書き込む必要かあり 
ます （ S - OS のモニタからは 「 J 0 C 7 C 」， 

「 JOCEEjTOK です乂 
80文字モードにするには，適当な（空い 
ている）アドレスから 

CD 7 C 0 C C 3 巳100 
と6バイトのブ□クラムを打ち込み，その 
番地（だとえば 12A0h 番地） に ジャンプす 
ればよいのてす。逆に 40文字モードに する 
には6バイトのフ □フラムを 
CD EE 0 C C 3 B 100 
とします。 12A0h, 12A6h からそれぞれ書 
き込んて，モニタと一緒に セーフして お< 
と便利て しよ 〇。（高 野庸 一， 泉大介） 

H X 1 のユーザーです。日頃，キーボ 
—ドからダンプリストを打ち込むと 
きに思ろのですが，アルフアベ ツ トの A 〜 
f の入力をテンキーの 0 ， 困， 日， EL 目， 
□ を押すことでできれば速<入力できると， 


思います。ちしソフト的な方法があれば教 
えて<ださい。 宮城県横山義行 

□ XI て16進キーを実現するには，丨 
〇 CS を書き換えて一間まかの機械語 
ルーチンへ飛ぶ必要かあります。そのため 
のフ□クラムが U スト 2 — A , ソース リス 
卜が 1 」スト2— 已てす。だだし， 8 CB 01, 
8 FB 01 用 （NEW BASIC も可）てす〇 tu - 
「bo BASIC ては動きません。 

使い方は，モニタから 「 GE 000」 もし< 
は巳 ASIC て 「CALL SHEOOj てす。テンキ 
—の0,回，日， B 巨□がそれぞれ A 
〜 F になり，□がスペースになります。も 
UI ] をスペースにしだ < なし\場合は E049h 
番地を 2 Ch にしてください。まだ，元に戻 
すには 「 GE 002」 てす。 

さて，このブ□クラムは簡単に U □ケー 
卜（移動)することかてきます。たとえば， 
C 000 H へ移動する場合は， | 」スト2-ムを 
C 000 h 番地へこのまま打ち込んだあとて， 
E 005 h 香地からの2バイトを 00h, C 0 h に 
して <ださい。16進キーモードにするには 
「 GC 000」 て，元に戻すには 「 GC 002 h 」 てす。 

(高野庸一 ） 

□ 最近 S - OS を打ち込んでいて実感し 
だことです。マシン語を打ち込むと 
き A 〜 F を打ち込むのに骨が折れます。そ 
こで， テンキーを16進キーにしたいのです 
が，フシン語は始めだばかりでよ<わかり 
ません。僕のマシン MZ - 2200にはテンキー 
の部分に全部で15個しかキーがありません 



画面右下すみに文字を表示 


009 BEEA07C ID 
548C5FCEA3 - C 


084A18EC0 

E1B742F02 

0319 EAC8C3 
OC2C1 21220 

1E22BE6DE9 
23077 F13FB 


-17B 22125 

20 A3A8E1EO 
0072 C2F122 
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ニタは 1 Z 001 M でなければ動きません。 

ほかのアドレスにこのフ□クラムを動か 
しだいときはリスト 3- A 中□て囲ってあ. 
るところを次のよ〇に書き換えて<ださい。 
だとえば FE 80 h へ動かす場合は次のように 
します。 

12 80 — 92 FE (92h = 12h + 80h) 

20 80 -> AO FE (A0h=20h+80h) 
このブ□クラムはほかのブ□クラムから 
壊されることのないアドレスに置<よろに 
して<ださい。さもないと暴走しますよ。 

(泉大介） 

お詫びと訂正 

Oh ! MZ 85年丨〇月号167ページ質問箱で， 
加藤孝治氏の名前が「加藤考治」となって 
いました。訂正してお詫び申し上げます。 


質問にお答えします 

日ごろ疑問に思っていること，どんなこ 
とでも結構です。どんどんお便りください。 
難問，奇問，編集室が総力をあげてお答え 
いたします。ただし，お寄せいただいてい 
るものの中には，マニュアルを読めばすぐ 
に回答が得られるようなものも多々ありま 
す。最低限，マニュアルは熟読しておきま 
しょう。質問はなるべく具体的に，機種名， 
システム 構成，必要なら図も入れてこと細 
かに耆いてください。また，返信用切手同封 
の質問をよく受けますが，原則として，質 
問には本誌上でお答えすることになってい 
ますのでご了承ください。なお，質問の内 
容について，直接問い合わせることもあり 
ますので，電話番号も明記してくださいね。 

宛先：〒102東京都千代田区四番町 2-1 
(株）日本ソフトバンク 
出版部 「Oh ! MZ 質問箱」係 



リスト （ MZ -2000 2200用） 


0000 





i 




0000 





2 

; EXTENDED 

KEY ROUTINE 

0000 





3 




0000 





4 




8000 





5 


ORG 

800 OH 

8000 





6 




8000 

18 

02 



7 


JR 

PATCH 

8002 

18 

34 



8 


JR 

CLCT 

8004 





9 


; 


8004 

21 

B4 

09 


10 

PATCH : 

LD 

HL.09B4H 

8007 

36 

C3 



11 


LD 

(HL),0C3H 

8009 

21 

12 

80 


12 


LD 

HL,START 

800C 

22 

B5 

09 


13 


LD 

(09B5H),HL 

800F 

C3 

B1 

00 


14 


JP 

00B1H 

8012 





15 


; 


8012 

79 




16 

START : 

LD 

A，C 

8013 

FE 

02 



17 


CP 

8015 

D2 

B8 

09 


18 


JP 

NC.09B8H 

8018 

78 




19 


LD 

A,B 

8019 

FE 

04 



20 


CP 

4 

801B 

C2 

CC 

09 


21 


JP 

NZ.09CCH 

801E 

7B 




22 


LD 

A,E 

801F 

FE 

10 



23 


CP 

15 + 1 

8021 

DA 

CC 

09 


24 


JP 

C.09CCH 

8024 

3E 

17 



25 


LD 

A,17H 

8026 

BB 




26 


CP 

E 

8027 

DA 

CC 

09 


27 


JP 

C.09CCH 

802A 

21 

20 

80 


28 


LD 

HL,TABLE-16 

802D 

19 




29 


ADD 

HL,DE 

802E 

7E 




30 


LD 

A,(HL) 

802F 

C9 




31 


RET 


8030 





32 




8030 

41 

42 

43 

44 

33 

TABLE : 

DEFB 

»A» :: *0* : 

8034 

45 

46 

36 

41 

34 


DEFB 

*E ， : ， F. : ， 6, : 

8038 





35 




8038 





36 




8038 





37 




8038 





38 

； モトニ 

モにス 


8038 





39 




8038 





40 




8038 

21 

FE 

02 


41 

CLCT ： 

LD 

HL,02FEH 

803B 

22 

B4 

09 


42 


LD 

(09B4H),HL 

803E 

21 

38 

14 


43 


LD 

HL,1438H 

8041 

22 

B6 

09 


44 


LD 

(09B6H),HL 

8044 

C3 

B1 

00 


45 


JP 

00B1H 


が，だとえば， SHIFT キーと [ E を押しだら 
「 A 」になるよろにすればよいと思います。 

兵庫県田中透 

□ テンキーとシフトキーを併用して16 
進キーにするというのは，おもしろ 
いアイデアてすね。 U スト3- A のような 
ブ□クラムを作つてみまし芝。800 Oh にジ 
ヤンブすればテンキーが16進キーになりま 
す。 ISHIFTI +而で A . ISHIFTI + e で F が屮, 
ます。 A は10, F は15てすから覚えやすい 
てしよろ。 1 SHIFT 1 +圍か押しづらいよろ 
なら [ SHIFT 1 + H ても結構てす。 

この機能をクリアするには8002 h へジヤ 
ンブしてください。このブロクラムは，モ 
ニタ 1 Z 001 M の内部ルーチンを変更後モニ 
夕へジヤンブするよろにてきています。モ 


.卜 （ xr 用) 


1 

E000 


ORG 

2 



; 

3 

E000 

1802 

HEXKEY : JR 

4 

E002 

180C 

NMRKEY : JR 

5 

E004 

2100 E0 

PATCHO : LD 

6 

E007 

111E00 

LD 

7 

E00A 

19 

ADD 

8 

E00B 

EB 

EX 

9 

E00C 

3EC3 

LD 

10 

E00E 

1805 

JR 

11 



; 

12 

E010 

3E7A 

PATCH1 : LD 

13 

E012 

11E602 

LD 

14 



; 

15 

E015 

21B403 

MOVE： LD 

16 

E018 

77 

LD 

17 

E019 

23 

INC 

18 

E01A 

73 

LD 

19 

E01B 

23 

INC 

20 

E01C 

72 

LD 

21 

E01D 

C9 

RET 

22 



; 

23 

E01E 

7A 

CONV： LD 

24 

E01F 

E602 

AND 

25 

E021 

CAB703 

JP 

26 



; 

27 

E024 

7B 

LD 

28 

E025 

1E41 

LD 

29 

E027 

FE2F 

CP 

30 

E029 

2820 

JR 

31 



; 

32 

E02B 

1C 

INC 

33 

E02C 

FE2A 

CP 

JR 

34 

E02E 

281B 

35 




36 

E030 

1C 

INC 

37 

E031 

FE2D 

CP 

JR 

38 

E033 

2816 

39 



; 

40 

E035 

1C 

INC 

41 

E036 

FE2B 

CP 

JR 

42 

E038 

2811 

43 



; 

44 

E03A 

1C 

INC 

45 

E03B 

FE3D 

CP 

JR 

46 

E03D 

280C 

47 



; 

48 

E03F 

1C 

INC 

49 

E040 

FE2E 

CP 

JR 

50 

E042 

2807 

51 



; 

52 

E044 

FE2C 

CP 

53 

E046 

2002 

JR 

54 

E048 

3E20 

LD 

55 

E04A 

5F 

NOCNGE : LD 

56 

E04B 

C3B903 

MATCH : JP 


0E000H 

PATCHO 

PATCH 1 

HL.OEOOOH 

D?,CONV-OEOOOH 

HL.DE 

DE.HL 

A.0C3H 

MOVE 

A,7AH 

DE ， 02E6H 

HL.03B4H 

(HL),A 

HL 

(HL),E 
HL 

(HL),D 


A,D 

2 

Z.03B7H 


；ORGIN. CODE 
；ORGIN. CODE 


；PATCH 


；RETURN 


A,E ;E=ASCII CODE 

E, ， A ， 

，/， ； 

Z,MATCH 


E ；E： 
•*• ; 1 1 
Z,MATCH 


； E= 


Z,MATCH 

E ；E = 

'+» ;，+ 

Z,MATCH 

E ；E= 

» - * . » - 

Z,MATCH ' 

E ；E： 


B* 

-> ， B ， 


C* 

-> , C , 


D, 

-> ， D ， 


E 1 

-> ， E ， 


; ， • ， - 〉 ， F ， 


NZ,NOCNGE 

A，， ， ；，，，->• 


E,A 

03B9H 


卜 （ MZ -2000 2200 用) 


A9DA96C99 

71B8AF056 

639EA 918 
3COFDC43 


1 2 2 c E 
2 2 o c 3 


18 


E 2 9 
F c o 


5 4 3 

4 B c 

4 2 9 
4 2 0 


9 4 c 13 2 6 
7 o c 2 4 o B 

210 EA92E2 
020 FD04F2 

83180 C114 
1 CB 71 c 421 
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♦ 丨丨月号のマシン語特集を読んでぼくの体の中で 
は炎がメラメラと燃えあがった。しかし10分もた 
たないうちにぼくは燃えつきてしまった。それは， 
ぼくが世にも恐ろしい〇〇コンだったのだ（ロリコ 
ンじゃないよ一）。 松田努 （14) 兵庫県 

簡単に燃えっきないで火種だけは残しておい 
てくださいね。マシンを手に入れたときのた 
めにも。 

♦マシン語特集に「逆上と挫折の歴史」を書いて 
いたエ藤誠さん。あなたはまだ運のいい方ですよ。 
ぼくの場合なんかは，5月号の EDAS を打ち込んで 
から，さあ使ってみようと思ってからふと気がつ 
いたんです。使い方がわからないことに。それか 
らの約3週間， EDAS というアドベンチャーに没頭 
し，やっとのことで AS , I , C などの命令が少しず 
つわかってきたのです。そしてなんとか自作のチ 
x ックサムが完成したとき Oh ! MZ の EDASM を見た 
のです。さすがに文字の M が多い分だけ使いやす 
く，独特のマクロも装備している。思わずぼくは 
EDAS を捨ててしまいました。 

高木淳 （15) 東京都 
♦マシン 語特集はたいへん参考になりました。と 
くに「わが青春の マシン コード」を読んで，自分 
の未熟さに気付きました。実はぼくも最近 マシン 
語を始めたばかりなのですが，その第丨作として 
5ドバイトのゲームを製作中です。当然のことの 
ように暴走の連続ですが，しかしぼくは絶対にあ 
きらめない。 横田紀明 （18) 山口県 

♦ 丨丨月号の マシン 語特集は最高でした。いまひと 
つ理解できなかった部分がかなり解決しました。 
いまは， BASIC で作ったプログラムを マシン 語に 
作り替えています。今度，また投稿しますからお 
楽しみに。 宇治原徹 （15) 三重県 

楽しみに待ってます。 

♦ Xlturbo を手にしてから3力月，ようやく BASIC 
の BA の字ぐらいが見えてきました。それにしても 
PC シ リーズの本はごまんとあるのに f turbo に関す 
る本の少ないこと。だから Oh ! MZ だけが頼りです。 
いまだに理解できないところもかなりありますが， 
自作プログラムを作って送れる日を夢見て，毎日 
キーボードに向かっています。これからも Oh ! MZ を 
頼りにしていますので，よろしくお願いします。 

三田和英 (36) 千葉県 
今月の特集で， I か C の文字まで見えてくる 
といいですね。 

♦丨丨月号の micro Odyssey には感動した。特に「〇 
〇は〇〇らしく」の丨文は，日ごろぼくが考えてい 
ることと同じである。もし「〇〇らしくない j では 
どうだと言うのだろうか。けど，学生らしくない 
と言ってはずれるのもつまらない。まあ，気楽に 
生きようと思う。 川野博司 （15) 大阪府 

♦ II 月号の Again Watch を読むまでは，モーターボ 

一卜がほしいと思っていたが，買うのは当分あと 
になりそうだ。 足立嘉孝 （17) 兵庫県 

令日経の「経済前線ランキング60年度版」を見る 
とおもしろいですよ。まず，59年のパソコンのシ 


ェアは，シャープは相変わらず3位ですが，58年 
にけ％—10%と落ちていたシェアが10%に踏みと 
どまり，今年は上昇してくれるのではないかと期 
待させてくれます。ちなみに2位の富士通は5% 
増の17%, I 位の NEC は± 0 %で47%維持のまま 
でした。パソコンはこれからという感じですが， 
日本語ワープロのほうは，シャープが6%増の14 
%で3位に上昇しています。ちなみに前年丨位の 
富士通は丨 I %もシ x アを減らして24%で2位に落 
ち，代わっての丨位は13%増のキヤノンで27%でし 
た。さて，最後に最も注目すべき点はカラーテレ 
ビのシヱアで，市場全体で一丨.3%の成長率にもか 
かわらず，シャープのシェアは丨％増の 13. 5%で 
3位に浮上しています。そしてこの原動力となっ 
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STUDIO MZ は，皆さんからお寄せ 
いだだいている愛読者カードのメッセー 
ジをメインに構成されています。ここい 


たのが，われらがパソコンテレビ XI なのでありま 
した。結局これが言いたいだけだったりして……。 
ついでに家庭用 VTR でも4位に浮上していました。 
シャープってエライ会社なんですね。 

土居秀二 （22) 京都府 
この コーナー にも Again Watch なみのぉ便り 
が届くようになって，たいへんうれし〈思っ 
ています。 

♦寒風吹きすさぶ中，愛車 DTI 25 とともに街をか 
け抜ける。赤信号で止まりふと前を見ると，そこ 
には赤のミラノ X-lturbo 。 いつかは買ってやる ぞ 
Xlturbo! と思いつつ赤いミラノをブッチギッた 
私であった。 山口幸一 （19) 宮崎県 

♦ シャープ本社 0 A ショールームのおねえさんは 
とても親切です。夕方だとほとんど誰もいないの 
で， パソコン ショップよりもず一っと落ち着いて， 
しかもていねいに教えてもらえます。この前 MZ- 
J 500でフラッピーをやらさせてもらっちゃった。 

柴田昌彦 (16) 大阪府 
-市ヶ谷の ショールーム も楽しいですよ。 
♦ナッ ナン ト， 私のクラスには MZ , XI ユーザー 
を含めて9人ものパソコン少年がいる。最初 Oh!MZ 
を買っていたのは私と友人の2人だけだったのが， 
今では9人全員が読んでいる。 “ Oh ! MZ で広げよ 
う友達のヮッ！！” 阿部崇 （15) 青森県 

大きな輪にしていきたいですね，これからも。 

♦ 10 月10日： MZ - 2500を買った。ひじょうにうれ 

しい。10月12日：交通事故にあって入院した。ひ 
じょうにイタイ。10月23日：病院のべッドでこの 
ハガキを書く。ひじょうにくやしい。早く退院し 
て， MZ にほおずりしてナデナデしてやりたい。と 
にかくクヤシイ！ 小岩 敬一 (24) 岩手県 

♦ぼくらの掲示板のコーナーに，「差し上げます」 
とか「よろしければもらってください」という項 
目はないのでしょうか。私は人にプレゼントをし 
て喜んでもらうのが大好きな性格なのです。もし 
そういうコーナーができればこの私にお任せくだ 
さい。 小島敬子 (29) 愛知県 

ぉ嫁さんにもらってくださいっていうのもい 
いんでしようか？ 

♦ II 月号 STUDIO MZ の大西さんはエライ！ぼく 
もあの「近いうちに MZ -80 K の特集を必ず……」に 



TO THE EOITOIR 

ちばんの本音を聞かせて<ださい。あわ 
せてイラストも募集します。 ユニークな 
7 TU ジナ;レ作品をお待ちしています。 


ダマされて，今まで待っていたひとりです。今こ 
そ MZ -80 K のパワーアップ講座を。 

宮内博文（け）広島県 
♦中学校へ教育実習に行ってきました。そこで， 
「先生は MZ - 1500を持っているのだ」と自慢すると， 
「ぼくは〇〇を持って るよ 「ぼく も △△を …… 」 
と，すごい機種の名前が返ってきました。最近 
の中学生はすごいんですね。 

竹内寛泰 （21) 広島県 
マシンは“もの”ではありません。使ってこ 
そのパーソナルコンピュータです。 
♦タバコを丨力月吸わずにためたお金で，ゲーム 
ソフトを2本買って帰ったら， XI 本体が動かなく 
なっていました。修理代はないし，タバコはやめ 
たし，今度は何をやめればよいのでしょうか。 

中村一浩 （34) 福岡県 
それはですね，タバコをやめたお金でまず修 
理に出して，しばらくはゲームをやめてしま 
うのがいいんじやないんでしようか。 

♦ 私の会社に出入りのある某社の特約店の M さん 
に 「 MZ - 2500を売ってください」と言ったところ， 
—瞬ズッコケたものの，気持ちよく承諾してくれ 
ました。ところが慣れない仕事をしたものだから， 
値引き率を間違えてしまったらしくて，会社の社 
長さんからしかられてしまったそうです。無理な 
注文をしてゴメンナサイ。 

立川賀規 （32) 埼玉県 
♦「 TOKYO ナンパストリート」に登場する女の 
子には鼻がないのを知っていますか。地元から横 
浜までの タクシー 料金は？ ディスコ，レストラ 
ンと連れて行って，ホテルに誘うと捕導員だった 
ということありましたか？ レストランのトイレ 
で才カマと……したことありますか？ うまく 口 
説いたつもりがプロの女性で，怖いおにいさんに 
どつかれたことは？ ぼくはすべての経験者です。 

石塚孝幸 （18) 奈良県 
私は彼女の父親に追い出されたことがありま 
す。 

♦ナンダ！あの 「 TOKYO ナンパストリート」とい 
うのは。やたら難しいじやないか。よっぽど本物 
のほうが簡単だぜ！（ウン，なかなか含みのある 
発言だ） 神崎寛 （17) 広島県 
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その成果を報告していただきたいものですね。 
♦「オオッ！コンピュータが考えとる考えとる」 
と騷ぎながら，みんなで楽しめるソフトが「棋太 
平」じ ゃ。 あの考えている (？) 間がまた楽しい。し 
かし.そばで見ていた奥さんが一言。「最初から 
そのようにプログラムしとるんだよ」だって。女 
の人って現実的で，夢もチボウもないんですねェ。 

華谷均 (26) 愛媛県 
♦「軽井沢誘拐案内 j を解いた。これはひとリで自 
力で解いた最初のアドベンチャーゲームだ。この 
ゲームはとても素唷しい出来で，なんとも言い表 
せない感動を党えてしまった。もう 最高。 

田村憲明 (14) 北海道 
♦最近，ポータブルワープロがたくさん出まわっ 
ている。メーカー，機種ともに多様である。しか 
し，コンピュータと連動できるようにするともっ 
と売れると思う。たとえば，プリンタや変換機能 
を利用して，コンピュータで処理できるようにな 
ればいいんじゃないでしょうか。 

山田 慎 （15) 愛知県 
そのとおり。 メーカーさん も勉強しなくては 
ューザーに 馬鹿にされますね。 

♦突然，父が 「 WD -600 なるワープロを買うぞ」と 
のたまいました。「あんな高価な物をどうして？」 
と聞くと，「20万円近い値段で買えるからだ」と言 
いました。それでもかなり高いと思ったのですが， 
実際に店頭で使ってみるとなかなかのもので，今 
から早くこないかと待ちどおしい今日この頃です。 

中川英也 （17) 三重県 
♦ PITMAN の移植版は勢ぞろいといったところです 
ね。うちには兄の MSX しかないので，それに移植 
してみましたが，なかなか楽しめます。また，新 
しい面を発表してくれるのでしょうか。 

伊藤英彦 （22) 青森県 
♦ぼくの家では，お父さんも Oh ! MZ のフアンなの 
で，いつもぼくと取り合いになります。今度から 
2冊買おうと思います。 

島津泰信 （14) 神奈川県 
♦教育ソフトの中に，地図帳などのソフトがあっ 
てもよいのではないかと思います。たとえばメニ 
ュー画面が日本地図や世界地図で，番号で地域を 
指定して，地名，国名，首都などを画面上に呼び 
出すことができ，人口や国王，大統領名は書き換 
えが可能なんていうのはどうでしょうか。 

田原健児 (30) 宮崎県 
XI の「ューザー辞普」を活用すれば簡単にでき 
そうです。 

♦阪神タイガースが日本一になり，まるで正月が 
21回来たようです。阪神タイガース日本ーバンザ 
ーイ！ 森晴信 （15) 京都府 

^ lex * i * con [ leksakan , -sikan | - sikan ] n . I ((特に 
ギリシア語•へブライ語•アラビア語などの)）辞 
書 （ dictionary )。 2 (( 特定の言語.作家.作品•分 
野などの)）語类（ごい）；語彙集；！:言〕語彙目録 
(研究社，新英和中辞典•第4版による） 

宗片陽一 （16) 山形県 
試験にでも出るといいですね，この単雄。 
♦シャープから 今度発売される「カラーイメージ 
ボード」はいいですね。いままで100万円以上し 
たものが4万円とは安いですね 一。 

小野秀貴 （16) 秋田県 
♦大阪のエレクトロニクスシヨウ’85のシャープの 
ブースで見た， MZ -6500 を使った翻訳システムは 
すごかったですよ。ぜひ Oh ! MZ でも紹介してくだ 


さい。それと， XI 用のカラーイメージボードも最 
高でした。 麻田幸男 （16) 京都府 

♦私は毎月，4冊ものクルマ関係の雑誌を買って 
いるあちらの筋の者ですが，それらの本を見てい 
て提案があります。つまりパソコンの新機種をス 
クープしてしまうのです。たとえば，このような 
記事です。——証言者の K 氏は生々しく新機種の 
詳細を語ってくれた。「あのキーボードは5500や 
6500とも違う，確かにそれらよりリファインされ 
ている。まさしく 7500に違いない」と——いかが 
でしょうか？ そうなれば，買ったすぐ後に新機 
種が出てしまうということがなくなるのでは。 

畑克海 （19) 神奈川県 

車の ようにアウトバーンやテストコースを 走 
っているパソコンをスク ープし たい。 

♦ II 月号の STUDIO MZ に Out door life に関するお 
便りもたまにはいいと書いてあったので，このぼ 
くが……。ぼくは高校を卒業したら絶対に HONDA 
バラードスポーツ CR - Xsi を買います。ナン ト 値段 
は150万円。ズズーン！ CR - Xsi の特長は，全長36 
75 mm , 全幅 1625 mm , 全高 1290 mm , 車両重置 860 kg , 
エンジン形式 ZC 型 1 .6£ D 0 HC , 最高出力 l 35 ps /65 
OOrpm , 最高速度 200 km 以上。 ぼくはこの CR-Xsi 
にハードショック，強化パッドと ZCI .7 必 + turbo 十 
インタークーラー (270 ps ) のエンジン積んで，さ 
らに無限 CR - XRR 0 エアロできめて，サーキットか 
ラリーフイールドをかっとぶのだ。 

永尾博幸 （17) 兵庫県 
カラーはシルバーメ タリ ックがお 衙め品 だと 
思いますよ。 

♦ 丨丨月号から買い始めました。そこで ZEDA ， ZAID , 
MACINT 0- S などをバックナンバーを注文して使い 
たいのですが，当然のことながら6月号の S -0 S 
MACE がないと動きません。しかし6月号のバック 
ナンバーが品切れとのこと，いったいどうすれば 
よいのでしょうか。まだこれからも MACE を使った 
プログラムが載ると思うんですが。 

岸稔 （18) 兵庫県 
お待たせしました。米 f ] 発売の2 «号にバー 
ジョンアップ版を掲敝するので，ぜひ活用し 
てください。 

♦ VP -80 K を買ったのですが， turbo 用の設定がど 
うもうまくできません。どうしても漢字があると 
文字がずれてしまいます。誰か VP -80 K 用のプリン 
夕設定データを教えてください。 

山口順一 (26) 鹿児島県 
VP -130 K モードで OK のはずです0 
♦フッフッフ，丨丨月号のものすご一いミス（バグ 
とも言う）見っけ。 P . I 48「 PITGAL 」 のプログラム 
の340行を見てください 。 MOVE MAN と窨いてある 
のさっ。ど一だ，まいっただろう。 

浅辺公彦 （15) 広島県 
これはですね，あのキャラクタはスカートを 
はいた男の子だということでは……。 
♦朝起きるとぼくは女の子になっていた。あたり 
を見まわすと金塊があったので取ろうとすると， 
石がじゃましてうまくいかない。それでもなんと 
かして全部取ると，新しくまわりの景色がかわっ 
た。永久に終わることがない部屋のなかで……と 
思っていたら夢だった。高橋昇一 （16) 奈良県 
夢でよかったのでしょうか。 

♦ PITGAL を打ち込んで遊んでいます。これはフラ 
ッピーに匹敵する面白さですね。作者の方は高校 
生なのかな？ もしそうだとすれば，学生さんを 


やりながらこんなにも楽しくて難しいゲームを作 
るなんて素晴しいことですね。それにキャラク 
夕もとってもかわいいですよ。 

森田光子 (61) 北海道 
とても理解のあるお母さんの登場です。 

♦ II 月号の Z 80 ニーモニック表を見て•思わず「パ 
ンザーイ！」と叫んでしまいました。だって2日 
ぐらい前にマシン語の本を読みあさって，「表は 
ない のか，表は」とぼやいていたんですから。 Oh ! 
MZ は，読者の声ならぬ願いを反映してくれるんで 
すね。 金田真生 （16) 東京都 

♦ 先日， turbo の 「システム 辞窨 j を 使って「夏目」 

と入力，その後「夏目漱石」と出るのを待った一- 
が出てこない。やはり第2水準は必需品である。 
このままでは丨，000円礼に申し訳がたたないではな 
いか。 ところで三菱自工の製品の型式番号はどう 
なっているか知ってます？ ナント MZ なのです。 

臼渕啓省 （19) 東京都 
♦私の父はとてもサンダーフォースが好きなので 
ある。今のところ最高記録は，テープ版を2周口 
ードさせて57360点とすさまじい。ひょっとする 
と，うちの父は日本ーサンダーフォースがうまい 
のではないだろうか。松尾匡章 （16) 兵庫県 
それはすごい。 

♦「火の鳥 j のテレビ CM はよく見かけるようにな 
ったが，しかし turbo を忘れてもらっては困る。こ 
こは一発 r 美味しんぼ j 風に，「まあ！ Z 80 のく 
さみが全然なくて，漢字のいい香りがほんのり 
と…… j , 「高速グラフィックのうま味を引き出す 
のは，ごてごてしたインタプリタをのっけるだけ 
が能じゃない。これはシャープの技術があればこ 
そなんだが…… j てなぐあいに，あのキャラクタ 
を使ってみてはいかがでしょうか。 

新居弘司 (22) 大阪府 
♦「ゲームばかりやっているけど，このままではい 
けない」と，いつも考えてはいるけれど，ついつ 
い今日もゲームをやってしまって悩んでいる方々 
へ。 もしまる一日でもフリーの時間がとれれば， 
パソコンの 横に持っているゲームソフトを全部積 
み上げて，次の日の朝までブッ通しでゲームをや 
り続けてみてください。きっとコンピュータに対 
して「すまない，こんなにこき使って，ほんとう 
に悪かった j という気持ちでいっぱいになります。 
すると，それ以降は BASIC をロードする割合がか 
なり増えるでしょう。 BASIC でプログラムを考え 
たり作ったりするのも楽しいですよ。8ビットだ 
つて，その気になればいくらでも使いこなせるの 
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です。「8ビットはゲーム専用」というのは，誰 
かが言った迷信なのです。 

田村佳則 （19) 埼玉県 
パソコンの革命的な発展はいっも8ビットマ 
シンからですよ。 

♦今年の5月号の「買います」のコーナーを読ん 
で，せっかく連絡してあげたのに，いっこうに返 
事をくれない人がいます。その後，何回か連絡し 
ても何も言って来ません。もう以前のことなので, 
これ以上とやかく言いませんが，とにかく気分が 
すっきりしません。皆さんもこんなことのないよ 
うに，ハガキを出すのなら必ず貴任を持って対処 
するようにしましょう。加藤雅勇 （16) 兵庫県 
当然のことですね。これからハガキを出され 
る皆さんはこんなことありませんよね。 
♦パソコンも3台目となり，今も昔も変わらず子 
供とゲームばかりの毎日です。当初の目的では CAI 
プログラム用にと思って買ったのですが，それも 
ままならず，なんとか Oh ! MZ で参考になる記事を 
お願いします。 大原一男 (32) 広島県 

今肖の特集はいかがでしたか。 

♦少し古い話ですが，今年の6月号の隠れプレゼ 
ン•卜の NEW BASIC はいったいどこにあったんでし 
ょうか。いまだにぼくは見つけられません。誰か 
教えてください。 坂直樹 （13) 三重県 

♦少年は思った。「まいったぜ。奴らの進歩はす 
ざまじい。やっとのことで追いつくと，奴らはま 
た新しい技で攻めてくる c 今の俺なんかじゃとて 
も追いつくことはできない。しかし今にみていろ 
俺だって……」と部屋に閉じこもり，秘かに復黎 
を誓う丨7歳の冬であった。弘俊亮 （17) 山口県 
♦夜勸のときでも. Oh ! MZ の発売日には昼にしっ 
かり目を覚まして本屋さんに出動します。毎月18 
日が楽しみです。 長田光則 (21) 静岡県 

♦私の身のまわりには，プログラムについて聞く 
ことのできる人がいなくて困るのですが， Oh!MZ 
の編集室ではバグに関する問い合わせにも快く応 
じていただいて，たいへんありがたく思っていま 
す。これからもよろしくお願いします。 

寺川雅元 （52) 高知県 
♦丨丨月号の「買います」のコーナーに載せていただ 
いたのですが，多くの方々からお手紙をいただき 
驚いています。残念ながらすべての方々から購入 
するわけにもいかず，ほとんどの方におことわり 
の返事を窨くことになってしまいました。この場 
をかりておわびとお礼を申し上げます。でもほん 
とうに MZ フアンの方々は善人が多いですね。遠く 



は 九州からもお手紙をいた だき， また 多く の方が 
私の希望価格以下の価格をハガキに書いてこられ， 
私の方がなにかすまないような気分になってしま 
いました。 MZ はマイナーになったと考えていた私 
が間違っていたようです。今は MZ よ永遠にといっ 
た気分ですね 3 山本直幸 (23) 茨城県 

♦ STUDIO MZ の仲間募集のコーナーに，年齢も書 

くようにしてください 0 そうすればレベル的にも 
同じ人が集まるだろうし，私ももう年なので小中 
学生のサークルにはチョット . 。 

村田嗣浩 （25) 北海道 
これからは仲間募集のハガキを送ってくれる 
場合には平均年齢を與いてくれるとありがた 
いですね。 

♦皆さん知ってますか？ナ，ナント，サロンパ 
スの TV コマーシャルで，泉ピン子のうしろにはあ 
の名機 MZ - 2000が置いてあります。 

小沼勝則 （15) 茨城県 
♦約2年半前に買った私の MZ -7 I 丨は，今月とうと 
う721になりました。おそらく日本で最後にでき 
た721だと思います。とにかく原始的だろうが， 
なんだろうが，カセットを制御するのに感動して 
いる最中です。あとはプロッタプリンタだけど， 
たぶん売っていないだろうな。 

菅谷薫 （19) 茨城県 
♦最近，「受験のためにパソコンを人に貸す j な 
どという軟弱者の多いのに私は失望している。私 
なんか，テニスの部活動には毎回必ず出席し，家 
に帰るとパソコンと葙るまでにらめっこ。それで 
も京都大学工学部電気工学科にみごとに現役合格 
してしまった……という夢を先日見たのだ。 

酒井英典 （18) 愛知県 
この夢を正夢にするためにも，これからがん 
ばってくださいね。 

♦私は富田対}子ちゃんのファンです。もちろん Oh ! 
MZ のファンでもあります。どちらもまだメジャー 
ではないので，まだまだこれから発展性がありそ 
うです。だから好きなのです Oh ! MZ が。そこで相 
談ですが，表紙はカラーイメージポードで作った 
グラフィックを使ったらいかがでしょうか。 

猪口正樹 (17) 佐賀県 

♦ 10月2旧(月)に共通一次試験の願軎を学校に提出 
しました。それから英単語暗記ツールを作ったの 
ですが，データ（単語数）が多いので入力がたい 
へんです。そこで試験に出る単語ディスク版なん 
てあればいいと思います。ところで，私は共通一 
次試験廃止には反対なのです。それはなぜかと言 
うと，私は理系でありながら国語，日本史のほう 
が数学や物理よりも得意なのです。したがって科 
自滅にも反対なのです。 

安孫子朋之 （17) 茨城県 

♦ Oh ! MZ を完全読破すると体重が I kg 減って しま 
う。それほど中身が濃いのさ Oh ! MZ は。 

青柳伸之 （17) 千葉県 

やっぱり。 

♦先日，コム •ロードに行ったら「とうとう付け 
てしまいました 防犯カメラ」 と 害いてあった。 

竹 村敏広 （17) 愛知県 
でも何故なんでしょ うね。 

♦とうとう裏表紙の MZ - 5500/6500の広告がレギ 
ュラー落ちですね。’84年5月から18力月は大記録 
でしょう。この記録を抜くのはどの機種なんでし 
ょうね。 都成孝之 （16) 大阪府 

♦タイガースがリーグ優勝したので，私はもちろ 


んのこと，家内も有頂天でした。このチャンスを 
逃すまいと 「Super MZ がほしい」と言ったら，あ 
っさりと「買えば」と答えてくれた。しかし敵も 
さるもの「電子レンジを買い替えたい」と言われ 
てしまった。そこでニコニコしながら「シャープ 
のにしなさい j と言ってやったんです。家内はさ 
っそく次の日曜日に買いに出かけたのはいいけれ 
ど， “ S " で始まり“ 0" で終わるメーカーのを買って 
きてしまったんです。シャープさんゴメンナサイ。 
しかし，私は間違いなく Super MZ を買ったのであ 
りました。今から来年も優勝したら何を買おうか 
と2人で悩んでいます。 

山本雅昭 (29) 神奈川県 
飛行機がおっこちたり，首都圈の国取が止まっ 
たり，たいへんな年でしたね’85年という年は。 
♦つい先日，北陸へ修学旅行に行ってきました。 

兼六園のおだやかな緑や，能登金剛の荒々しい岩 
場，高山の古い町並みを目にして，何か心の中にし 
みじみとくるものがありました。しかし，高山の 
本屋さんで namco の本を買ってしまうあたり，コ 
ンピュータは丨度染まってしまうと，なかなか忘れ 
がたいもののようです。パソコンはこれからも趣 
味として続けて行こうと思っていますが，他のこ 
とにももっと目を向ければ，パッと何かが開ける 
かもしれないなあ，などと考えている今日この頃 
です。冬休みには鈍行列車で，どこかの古寺に行 
ってみたいと思っています。 

溝口健二 （16) 愛知県 
♦ユーカラを使ってクラスの座席表を作成したら， 
先生方にたいへん好評を得ました。今までは，個 
人的なものにしか使っていなかったのですが，こ 
んなに簡単なことでも他の人に役立つということ 
はたいへん嬉しいことです。 Xlturbo はやはり実務 
に使うことが狙いですからね。 

山本正幸 （16) 静岡県 
他の人にパソコンを使う楽しみまでわかって 
もらうことがいちばん嬉しいですね。 
♦ぼくの MZ -2000 に16ビットボードを付けました。 
いまさら付けて何をするんだと言われそうですが， 
そんな声は無視して逆アセンブラを製作中です。 
完成したら Oh ! MZ に投稿しようと思っています。 
もし16ビットボードを付けていて，これからマシ 
ン語を勉強したいと思っている人には.技術評論 
社から出版されている ： 98 FAN BOOKS 2-98 マシン 
語』をお薦めします。8088もなかなかおもしろい 
よ。 大村則道 （15) 静岡県 

♦ここ何力月かの間，愛機の MZ -80 B が起きてき 
ません。早く起こしてあげないと,永遠の眠りにつ 
いてしまいそうで不安です。アア，ゲームがした 
い，漢字を使いたい。 80 B ， どうしてあなたは 80 B 
なの？ 片山明秀 (26) 大阪府 

♦ Xlturbo model 30 に，やっとのことで熱転写漢字 

プリンタを取り付けたゾ。さあこれからがんばろ 
う。 酒井弘志 (33) 宮城県 

♦ Oh.'MZ 9月号のお見合いから2力月，ついに私の 
だんな様 MZ - 2500がやってきました。 ** その筋”の 
弟（知る人ぞ知るドルーピー）が作ってくれたグ 
ラフィックツールでお絵描きしたり， FM 音源で遊 
んだりしています。速いし，頭はいいし，値段は 

安いし，文句なしです . と，ついついのろけて 

しまう私です。 松岡真理子 （18) 山形県 

ウウッー！ 2500が羡しい。 

♦この前，あるパソコンシヨップに行ったときの 
ことです。ある3人の子供の会話を聞いてしまっ 
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★現在， MZ - 2500を購入して悪戦苦鬪していると 
ころです。誰か同じ機種のユーザーの方で，情 
報交換してくれる方を探しています。連絡はハ 
ガキで。恧780高知県高知市青柳町44下知排 
水所内（南）味元勝郎 

売ります 

★ MZ - I 500 用プリンタ MZ -1 P 14( ケーブル付）を3 
万円で。まずは往復ハガキで。忝 959-24 新 
潟県北蒲原郡加治川村大字向中条844中野道弘 

★ MZ - I 500 用プリンタ GP -500 Z + ケーブル MZ -1 C 47 
を2万円で。 ®859-32 長崎県佐世保市権常 
寺町 876-2 原明博 

★プリンタ MZ -1 P 07 (本体のみ）を2万5千円で。 
データミッター DR - I 00 (トリオ）と MZ - 2200用イ 
ンタフェイス（ソフト付）を2台セット3万円 
で。近くの方を希望。ハガキまたは TEL で。® 
671-12 兵庫県姫路市網干区高田166-丨丨岩本 
光春 30792(73)9426( 夜8時以降） 

★漢字 プリ ンタ MP -80 K ( エプソン） 定価18万9千 
円を5万円で。 MZ -2000/2200 で使用する方には 
インタフェイス （ I / O データ製）を付けます。ま 
た MZ -2000/2200 用純正 FD インタフ x イスを I 万 
5千円で。まずは往復ハガキで。忝011秋田 
市飯島美砂町 6-1-105 出雲正行 

★ XI 用漢字プリンタ CZ -80 PK を3〜4万円で。まず 
は往復ハガキで。 ®0 I 0 秋田市川元むつみ町 
2-40 菊地金作 

★ X 1用320 KB 外部メモリ CZ -8 EM + 64 KB プリンタ 
バッファを5万円で。暴546大阪市東住吉区 
桑津卜 9-24 仲田荘田窪伸兒 

★ XI 用 CZ -8 RB と CZ -8 FA ， CZ -31 FR (ソフト付） 

を半額で。まずは往復ハガキで。®>32卜14栃木 
県日光市相生町182秋山吉康 

買います 

★スタティック RAM ポード MZ -1 R 12 を定価の半額 
ぐらいで。連絡はハガキで。暴567大阪府茨 
木市平田 2-22- 16前川新 

★ MZ - I 500 用の漢字 ROM ( MZ -1 R 23) + 辞 害 ROM 
( MZ -1 R 24) の両方セットで3〜4万円で。また 
はどちらか一方だけでも可。連絡は希望価格明 
記のうえ封書で。娜 037-03 青森県北津軽郡 
中里町大字豊島松田幸喜 


★データレコーダ CZ -8 RL 1 を丨万2千円で。連絡 
は往復ハガキで。 ®034-01 青森県十和田市大 
字深持字長下30佐々木一夫 

★ X 1 C 用拡張 I / O ボックス+漢字 ROM を3万円以下 
で。連絡は往復ハガキで。想316福岡県大牟 
田市草木256塚本雅彦 

Oh ! MZ バックナンバー 

★ 1984年10月号を1,000円（送料別）で。切り抜き 
は不可。連絡はハガキで。想 519-21 三重県多 
気郡多気町相可231達浩也 

★ 1984年9月号から’85年 I 月号までの5冊を各し0 
00円（送料込）で。落窨き，汚れ可，切り抜 
きは不可。まずは往復ハガキで。 ®636-03 奈 
良県璣城郡川西町唐院213吉仲正和 

★ I 984年8月号 P . 49〜「超高速ペイントルーチン」 
と，’84年 I 丨月号 P . 127〜「ハイパーペイントルー 
チン&クロマキーペイントルーチン」の記事の 
切り抜き，またはコピーを両方あわせて500円 
以下（送料込）で。連絡はハガキで。娜丨89 
東京都東村山市萩山町 4-14- 1 1加藤隆 

★ 1984年8月号を1,000円 （ 送料別 ） で。切り抜き不 
可。もしくは当方のバックナンバー’84年3，4 
月号との交換も可。連絡はハガキで。 ®852 
長崎県長崎市音無町 18-30 江里口裕之 

★ 1984年3, 4, 5，8月号を各1,000円（送料込）。切 
り抜きは不可。まずは往復ハガキで。娜420 
静岡県静岡市北1765-166原田雅樹 

★ 1983年 II 月号，’84年3, 4，6月号の4冊まとめ 
て5,000円，または各1,000円で。切り抜きは不可。 
連絡はハガキで。暴574大阪府大東市灰塚 4- 
336-23 西一夫 

★創刊号から1983年4月号までをまとめて7,000円, 
または各1,000円（送料込）で。連絡は往復ハガ 
キで。砺 089-34 北海道中川郡本別町美里別 
東中高木一明 


♦掲載ご希望の方は，官製ハガキに 
項目（売る.求む…… ） を明記してお 
申し込みください。 

♦ソフトの売買，交換については， 
いっさい掲載できません。 
♦取り引きについては当編集室では 
責任を負いかねます。 

♦応募者多数の場合，掲載できない 
場合もあります。 


もよろしくお願いいたします（この部分は1 
月1日以降にお読み〈ださい）。 


す。そこで， Oh ! MZmini という別冊はいかがでしょ 
うか 。 A 5判サイズで150ページ，200円。内容は， 
MZ 関係はもちろん，他メーカーや海外の新製品情 
報，ハード，ソフトの売り上げ BEST 10などで， 
これだけでは Oh ! MZ に関係ないから, MZ -5500/6500 
を使ったビジネスコーナー，シャープコンビユー 
夕使用 レポート など。 この内容で200円，さあど 
うだ。 串田建二 （17) 新潟県 

♦ 新年明けましておめでとうございます。昨年は 
S -0 S 誕生， MZ - 2500発売と， MZ 周辺は多忙でリ 
ツチでしたね。今年は Oh ! MZ の読者はすべてマシ 
ン語に精通すべく，みんなでがんばりましょう。 

得地茂 (29) 北海道 
旧年中はいろいろお世話になりました。今年 


ぽくらの掲示板 



たのです。その会話の内容とは ， A : 「 ROM ってな 
んのこと ？」 B :「俺もそれがわからなくて悩ん 
でるねん」 C : 「それは，このカートリッジのこ 
とやで」と言って MSX 用の ROM カートリッジのゲ 
ームを指さしたんです。これは実話です。 

田中克彦 （15) 兵庫県 

♦今度，マクドナルドでアルバイトを始めました。 
場所は山梨の甲府駅ビル店です。ぼくは身長 170 cm 
ぐらいの顔のいい（本当だよ）少年ですし，ほか 
にもかわいい娘もいっぱいいますので，お近くに 
お出かけのときはぜひご来店ください。 

前田理 （15) 山梨県 
♦ Oh ! MZ を週間にという声をよく聞きますが，今 
の内容を週間誌にするにはチョット無理がありま 


仲間 

★全国の MZ -2000/2200/2500 のファンのみなさん， 
こちらは「水戸 MZ 22クラブ」です。活動内容は主 
に情報交換を目的としていますが，特にフロッ 
ビーのソフトおよびハードに関して勉強してい 
ます。興味のある方はハガキか電話で連絡を。 
®3 I 0 茨城県水戸市千波町 II 73-1 桃井秀明 
00292(41)4787 

★ぼくは MZ -700 を持っていて，やっとプログラム 
も作れるようになりました。誰かぼくの情報交 
換の仲間になってくれませんか。ハガキを待っ 
てます。恧920石川県金沢市小立野 3- 4 -52 
多賀秀和 (15) 

★「 X 1 LAND - えっくすわんらんど一」では，現 
在，会員を大募集しています。活動内容はロー 
ルプレイングやアドペンチャーなどのゲームの 
情報交換が中心で，毎月会報も発行しています。 
会貴は丨力月100円，入会金は不要です。会員は 
現在約80名。詳しいことをお知りになりたい方 
は60円切手同封のうえ連絡を。 ®679-53 兵庫 
県佐用郡佐用町佐用3124-丨新免一 

★「 MXC 」 では，現在会員を募集中です。毎月 RPG 
や ADV などの特集を組んだ会報を発行していま 
す 。XI ユーザーの 方ならどなたでも參加できま 
すので，我と思われん方は60円切手を同封のう 
え連絡を。 ®960-06 福島県伊達郡保原町字 
竹内町2 水口昌郁 

★ XI ユーザーの皆さん 「RUN XI 京都」に入会しま 
せんか。まだできたばかりのクラブですが，会 
報の発行や情報交換など密度の濃いクラブにし 
たいと思っています。興味のある方は60円切手 
同封のうえ連絡を。 ®601-13 京都市伏見区 
醍醐中山町 39- 2市住中山団地17棟502号黒沢 
健次 

★「 WHAT ?! XI クラブ j では会員を募集します 。XI 
を現在持っている人，またはこれから買おうと 
思っている人は，ぜひ当クラブに参加しません 
か。入会費は無料です。詳しいことはハガキで 
連絡を。筋 059-09 北海道白老町末広 5-9-5 
村岡通信 

★ XI ユーザーで Oh ! MZ の読者の方，気楽に情報交 
換しましょう。まずは封書か往復ハガキで連絡 
を。 ® 190- II 東京都西多摩郡羽村町 3-20-6 
コーポ綠ヶ丘101号小川淳一 


桑原誠(15)東京都 
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この コーナーは 本誌年間モニタの方々より 
返ってきたレポートの中からご意見，ご希望, 
または気になる情報を抜粋して毎月皆さんに 
お届けしていきます。今月は丨丨月号に対する 
モニタです。 II 月号の特集に対するご意見や， 
今月号の特集への要望などを中心にまとめて 
みました。 


籲あなたは建築デザイナーく 5>は，レイアウ 
卜さえ変更してくれれば言うことなしです。 

図やイラストをうまく使い，フローチャート 
もあったので，全体の流れが手に取るように 
わかることができました。ブログラムも大き 
な文字で非常に見やすかったのですが，イラ 
ストはフリーハンドよりも，どちらかと言え 
ば定規を使った線のほうがこの場合はよかっ 
たように思います。 

田村唷希 （16) XI 熊本県 
春丨丨月号には， Z 80命令表が掲載されていた 
ので非常に助かりました。特集の記事内容は 
意外と簡単に理解することができたので，自 
分の基本知識がどの程度のものか判断するこ 
とができたような気がします。その中でも山 
田氏の「オーナーズマニュアルが聖窨です」 
は，これまでの自分の経験と同じような内容 
だったので共感を覚えました。ただ，特集の 
トビラに並んだタイトルを見ただけでは内容 
がサツハ•リわからないものがいくつかあった 
ので，そういったものについてはサブタイト 
ルを付けるなどの工夫が必要だと思います。 
また，本文中の専門用語などは，初心者にと 
って記事を読んでゆくうえでの障害となりか 
ねないので，特集の最後や撊外にまとめて専 


門用語の解説文を付けてもらえば，もっとわ 
かりやすいものになったのではないでしよう 
か。紺谷憲児 （18) X 1, MZ -73 I 大阪府 
• Oh ! MZ に掲載されているゲームプログラ 
ムについて気がついたことなのですが，読ん 
でいると入力方法，遊び方，それではどうぞ 
楽しんでくださいとあったあとで，長い英数 
字のかたまりが続くのでは，せっかくのゲー 
ムの魅力が薄れてしまいます。せめて作者自 
身によるプログラムの PR や，編集室の推薦文 
やアドバイスをいっしよに載せてみてはどう 
でしようか。 

宮川正雪 (20) MZ - I 500 東京都 
• 「霧降高原から/バソコンはバイクに乗っ 
て」は，読み物としてとても素敵だと思いま 
す。ただでさえ難解な専門用語の多いバソコ 
ン誌の，あのリストばかりの記事と，細かい 
文字ばかりを追っていると，どうしてもこん 
な読み物がほしくなってしまいます。このよ 
うな記事はバソコン雑誌の清涼剤といったと 
ころでしようか。ただ，ひとつだけ不満を言 
わせていただくとすれば，せめてあと丨ペー 
ジでいいですから，增ページをお願いしたい 
と思います。 

松木淳子 （29) FM - New 7， PC -600 l 京都府 


I ごめんなさいの 

コーナー 


ン番号 26 は 36 の誤りです。 

図丨卜 B , C 実体配線図で， PI 0 の36番ピ 
ンと LS 00 の8番ビンをつなぐ線は， PI 0 の 
37番ピンと同 LS 00 の8番ビンに変更して， 
さらに PI 0 の36番ピンと LS 32 の I 番ピンを 


12月号感動の XI 〖) x の製作である 
P.59 表 3 地獄の配線表 
31, 32番を次のように訂正してください。 
- A 7— IC 3-2# (WRITE PR 0 T ) 
- A 8- HC 3-4 番 ( PACK ) 


12月号ハード製作の基礎知識 
P.34 右段26行目 

セラコンの数字の意味は「これを abc とす 
れば容置は abXI 0 c pF です。たとえば103 
と書いてある場合，容量は I 0 XI 0 3 pF =0. 
OkF です」の誤りです。 

P.36 図 14 部品表 

「8圓多スズメツキ線」は「0.8圆多スズメツ 
キ線」，「カンハヤト」は「サンハヤト（基 
板） j の誤りです。 

P.37 中段 3 行目 

「 LED は足の短いほ$ ,もしくは太いほう 
(つまリカソード）を 1 C に向けて付けます」 
の誤りです。また，図16実体配線図左上の 
「- H - j の記号は 「- H - j の誤りです。 

12月号共通 I / O ポートの製作 
P.4I 表 2 〜 5 部品リスト 

基板としてサンハヤト「2000/2200用基板」, 
「 XI 用基板」ではよくわからないというお 
問い合わせをいただきました。型番はそれ 
ぞれ MCC -157, MCC - I 53 ですから，そのよ 
うに注文すれば確実だと思います。また， 
コネクタの型番は FAP -26-03 となっていま 
すが，これには#丨〜#4の4種類がありま 
す。どれでも使用できますが，ハンダ付け 
用#2がベストです。 
p .44-47 図8〜11 

図中，セラコンの数字と容置が全体に不一 
致ですが,すべてパスコンですので103, 104 
どちらを使用してもかまいません。 

• MZ -80 K / C / I 200 

図 N - A 部品配置図のボード内「注」の下 
の a は b の誤りです。 

• MZ -700/1500, 80 B /2000/2200 

図 9- A 回路図の Z 80 A PI 0 内 I 0 RQ のピ 


接続してください。 

PIO (36)- LSOO ( 8 )-> PIO (37)- LSOO ( 8 ) 
PIO (36)- LS 32( I ) 

• XI 

図 10- B 部品配置図で， PIO の右の 2 K の 
抵抗は，右側の LS 32の右に置き，4番ビ 
ンの隣りに抵抗の足がくるようにします。 
また， 3.3 K の抵抗が載っていませんが，こ 
れは LS 08の左側に置き，12番ピンの隣り 
に抵抗の足がくるようにします。実体配線 
図を参考にしてください。 

図 I 卜 D 実体配線図で，中央右の 1 K の 
抗は 3.3 K の誤まりです。また，左下 L 穿00パ 
の I ，2, 3番ビンはこの順につないでシヨ 
一卜させたほうが動作が安定します。 PI 0 
のビンが左右丨本ずつ足りませんが， I 〇番 
ピンと3〇番ビンが足りないものと考えて， 

図中に追加しておいてください。 

12月号 FM 音源ボードの製作 

P.53 ボードの写真（目次， 31 ページも同じ） 
左上にあるコンデンサは不要のものです。 
無視して製作してください。また，表4部 
品表の中で， O . P . の「4558 X 2」は「4558 
X 3」 の誤りです。なお， YM -2203, YM -30 
14が2セット手に入らない場合は，とりあ 
えず丨セットだけでも使用できます。その 
場合， ICV ケットはすべて取り付け，右列， 

左列いずれか一方に YM -2203, YM -30 I 4 を 
さして使用してください。 


バグに関するお問い合わせは 

Q03-E63-2E30 

月〜金曜日16 : 00〜18 : 00 


なお，表のとおり配線してしまった場合も 
本体が壊れる心配はないはずです。 

12月号画面に愛を告白する方法 
P.97 左段 15 行目 

「 MZ - 2000のモニタでは11 DIh がそうで， 
IIDIh に X 座標， 11 D 2 h に Y 座標 …… j 
の誤りです。 

P.98 右段下から 5 行目 

「A = (A mod 5)+ I 」は 「A = (( A +1) mod 5) 
+ lj の誤りです。 

12月号 Prolog -85 

「 Prolog -85 を走らせるには，85年7月号の 
S -0 S のバージョンアップが必要です」と 
の記述が落ちていました。これを実行して 
いない場合はメモリオーバーのエラーが出 
ますので， S -0 S の 1 F 6 Ah 番地力、らの2 ノ、 • 
イトを各機種次のように害き換えてくださ 


Xl/Xlturbo .00 FF 

MZ - 2000 /2200( G - RAM あり ）…… FFFF 
MZ -80 B / 2000 ( G - RAM なし）……0000 
MZ -700/ I 500 …… OODO 

MZ -80 K / C / I 200 …… 00 C 0 

また，各機種次のアドレスの内容を 00 h か 
ら OIh に書き換えておきましよう。 

Xl/Xlturbo . I54Dh 

MZ -80 B /2000/2200 ……132 Ah 

MZ -80 K / C / 1200/700/1500 ……123 Ah 


お問い合わせは原則として，本誌のバグ情 
報のみに限らせていただきます。入力法，操 
作法などはマニュアルをよくお読みください。 

また，よくアドベンチャーゲームの解答を 
求めるお電話をいただきますが，本誌ではい 
つさいお答えできません。ご了承ください。 
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■ S-OS 大賞 

1 清水和人賞 
■投稿大藝集 

►シリーズ企画 S-OS では，共通化システム 

関係の投稿を下記の部門に分けて募集いたし 

ます。 

0 システム賞：パッケージなどの追加に 
より S-OS のパワーアップに成功した例 

2) アプリケーション賞：ユーテイリテイ 

やツール，ゲームなどの開発例 

3) 言語賞別名こうもとやすひこ賞：各 
種言語（インタプリタ，コンパイラなど） 

の開発例 

4) 発展賞： S-OS を他機種に移植して仲 

間を増大させる例 

期限は特に設けません。優秀な作品を選ん 
でそのつど誌上公開し，規定の原稿料および 
記念品を差し上げます。記念品はソニースポ 
—ツウオークマン ( WM - F 75) です。 

► 6 月号でお知らせした青水和人賞」です 
が，テキスト•アドベンチヤー部門では， 

北斗 賞 （スリル&サスペンス） 

南斗 賞 （ユーモア&パロディ） 

の 2 部門を設けました。アイデア，シナリオ， 

プログラムともに受け付けています。奮って 

ご応募ください。 

なお，これまでのゲーム特^ 賞は 「清水和 
人賞」としてテーマを限らず受け付けます。 

皆さんの力作をお待ちします。 

〈賞品〉 

清水和人賞 ソニースポーツウォークマ 

ン WM - F 75 32,000円 

北斗賞 - カシオポケットテレビ 

南斗賞 」 19,800円 

►今月のテーマはありません。シヨート，そ 
の他の投稿も変わらずお受けしていますので， 
どしどしご応募ください。 

採用になった作品には，本誌規定の原稿料 
冬お支払いします。また，投稿作品のなかか 
ら特に優秀な作品には「月間特別賞」として 
原稿料とは別に記念品を差し上げています。 

今回の記念品はソニースポーツウォークマン 

( WM - F 75) です0 

皆さん，投稿をお待ちしています。 

• - 

•原稿には，住所•氏名.年齢•職業•連絡 
先電話番号.機種.使用言語.必要な周辺 

機器 • マイコン歴を明言己してください。 

•プログラムを投稿される方は，詳しい内容 
の説明，利用法^できればフローチャート， 

変数表，メモリマップ（マシン語の場合） 

に，##文献を明記し，プログラムをセー 
ブしたテープ（ディスケット）を添えてお 
送りください。また，プログラムは最低2 
回はセーブしてください。 

•ハードの製作などを投稿される方は，詳し 
い内容の説明のほかに回路図，部品表，で 

きれば実体配線図も添えてください。編集 

室で検討の上，製作したハードが必要な場 

合はご連絡いたします。 

•投稿者のモラルとして，他誌との二重投稿， 
他搬重用プログラムを単に移植したものは 

固くお断りいたします。 

あて先 

〒102 東京都千代田区四番町 2-1 

日本ソフトバンク出版部 

Oh ! MZ 「©〇@@ j 係 

|SHIFT BREAK 

►初登場の KYO です。先日，知る人ぞ知る駒場祭で， 

矢 Q る人ぞ知る河童踊りを踊って参りました。雨の中， 
日本酒をかっくらいながら， 0 B を交えて部員一同， 
踊り狂いました c 最後にプールに飛び込むのですが， 

その水の冷たさは，とても筆舌に(おくせません。 

でも来年もやります。見に来てください。 ( KYO ) 
►先日，国電力 0 i ： 面マヒした。私にはまったく関係 
なかったのであるが，友人の中にはその日に実験が 
あったせいなのか，新幹線を利用してやって来る人 
もいた。ゲリラどもに怒っていると，今日は編集室 
が停電？なぐり込みかと思いきや，ブレーカーが 
飛んだだけ。つかの間のサスペンス。 （ Y ) 

►いよいよ年末コンパが多くなる季節がやってき 
ました。私の学校のクラブでも，いろいろと理由を 
こじつけては，コンパが開かれています。今コンパ 
では，かならず巧というのがありますが，だれが 
あんなくだらないことを考え出したのでしょう。酒 
はまずくなるし，死ぬ人も出てきます。やはり酒は 
好きなものを好きなだけのむのがいいことだと思い 
ます。 （技） 

►下高井戸のとあるデパートの屋上に行ってみると， 

懐しいゲームがたくさん置いてありました。それも 
テレビゲームが出る以前のピンボールなどのたぐい 
のものばかりなのです。ご丁寧にも横でラムネまで 
売っていました。あまりの懐しさに眺めるだけで満 
足し、ゲームをやらずに帰りました。 （こ） 

►この前，パソコンサンデーを見ていたら，白石さ 
んがハレー彗星にかこつけて自分の誕生日を宣伝:？） 
していた。実はくも誕生日が同じなのだが.ぼく 
はそんなことはしません。 II 月27日だったなんて， 
恥ずかしくて口に出せません。ちなみにあのブルー 
ス • リーも同じ誕生日なんですよ0 ( Ku ) 

► turbo を買ってからちようど1年がたらました。 

マニアタイプもイ吏っていたので，もう3年も XI に 
付き合ってきたことになります。それなのに超初歩 
的なミスをしてしまいました。98用のプログラムを 
移植していて，入力がすべて終わりディスクのディ 
レクトリを見たとき，思わず見慣れぬファイルネー 
ムのプログラムを LOAD してしまったのです。…… 
なんて馬鹿なんだ！ （ K . A .) 

►明けましておめでとうございます。いや年じゃあ 
ありません。夜でんがなにぬねの。流石（るせきじゃ 
ないぞ！）にこの時季になるとこ一ゆ一生活となり， 

私の健康はじわあ，じわあとムシバマレていくので 
す。コタツでぬくぬくとコンピュータ（略してコタ 
コン）のし過ぎに注意しましよ一。それしけても世 
間の， X ’ mas 騒ぎがまるで別世界のよ一であること 
よ。 ( IMT ) 

►や，やっと解けました「デゼニランド」。その勢 
いで「ザ•キャッスル」， 「 WORRY 」 を終え，現在「ハ 
イドライド j の城の所でもがいています。実はみん 
な途中でいやになって投げ出したものばかりで，再 
度挑戦しているというわけです。他にもあるんです 

よね「スターアーサー伝説 I 」と力 . 。 （は） 

►引っ越ししてから早や2力月。ようやく落ち着い 
てきたらこの寒さ。この前ヌクヌクと一•日ストーブ 
にあたっていたら，ムードが盛り上•がってきて，つ 
いに2年振りのハンダ付けとなりました。復帰第一 
作は RS -232 〇用のヌルモデム。 PC -820 I と MZ - 2500 
の熱い対面となりました。やっぱり冬はハードがい 
いなァ。 （ M . K .) 

► K.S •さんへ。 Will をやっていたら興奮してキーボ 
ードにビールを飲ませた話なんて書けません（恥ず 
かしい)。「イゥ j がわからずカプセルの前で立ち往生 
したことも窨けません。でも，堀ちえみのベストに 
「クレージーラブ」カヾ入ってないのはケシカランとい 
うことは窨けるのです。 （ K 0) 

►というわけで，問題はカツ丼である。私はその日 

カツ丼を食べる予定であった。それがダメになった 
とき私は動揺した。人は期待していたことか裏切ら 
れると寂しい。海がドッパーンで「海のバ□□□口 
カヤロー」と叫ぶのである。それが人生，それが男 
ぞ，とついつい4行目を1碎で改行してしまう私で 
あった。日本這吾は正しくイ吏いましょう。 （ K . S .) 
►昔の映画の中では，すべてのコンピュータにはち 
らちら点滅するノ、°ネルカ咐いて L 、たわけだ。そいで 
もって，今でも映画の中の化学の研究室にはフラス 
コの中に水とドライアイスを入れたものが置いてあ 
るわけだ。そいで，最近はパソコンがけっこう TV 
ドラマなんかに出てくるんだけど，未来の設定なの 
に CRT が320 X 198だったり，漢字が出なかったり， 

プリンタが異常に騒がしかったりするわけだ。やは 
り，一目で「あの安い槲重だ」とわかるようなのはい 
けませんな。特に XXX 製のやつは。けけけ。 （ M ) 
►先月の日曜日，東京は秋葉原という街の一角で， 
シャープ主催の「わんさかバザール」なるものをや 
っているというので，チヨットだけのぞいてきまし 
た。会場はあまり広くなかったけれど，大勢のユー 
ザーの熱気がムンムン。会場のあちこちを見まわし 
て「あれもこれも安いなあ，みんな熱/！:、だなあ」と 
ただただ感心して帰ってきました。めでたし，めで 
たし。 ( N ) 

►「 FM 音源サウンドエディタをチェックしたい」 

などと言づ r 共通 I / O ポートと FM 音源ポードを借り 
ておきながら，ついつい遊んでしまった。いろんな 
音を選んでは鳴らしてみる。もっといい音にしよう 
とデータをいじっても，なかなか期待どおりの音に 
はならない 。 F M 音源って奥が深いね！ （@) 

► A 少年が「ボールブレイザー」 ( ATARI ) を持って 
きたため，その電光石火の 3 D グラフィックスにド肝 
を抜かれ，いったい日本のパソコンは何をやってき 
たんだと怒りまくり，もはや68000スーパーフアミ 
コン版の「マーブルマッドネス」でも移植して文柏 jt 
するしかないと思う今日このごろ。え一と，あれ？ 

ぁれ？ ⑴ 
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’86. 2 月号 1 月 18 日出発売 

• 特集私が主役だ / 

• 全機種共通システムディスク対応 S-OS“SWo 「 d” 
• BASIC DATA LIST Part.S 


最近，新聞を読んでいると「身内のことが本 
に.なる『出版論』花盛り」という記事が目につ 
いた。その記事の内容は，なぜか出版界内部そ 
のものを テーマに した本の刊行が相次いでいる 
というもので，その中に害いてあった「出版物 
の置的'; E 篮の中で，もはや害店は売れそうもな 
い堅い本などは荷ほどきもせず，店内在庫本を 
トコロテンのように店外に突き出す j というく 
だりが気になったからだ。 

私は，今でも頻繁に窨店に足を運んでいるほ 
うだが，ここ数年の街の小さな害店の店内の移 
り変わりを見ていると，どんどんと書籍を置い 
てある スペースが 姿を消し，雑誌 やコミック， 
文庫本にその領域を占領されつつある実状が， 
歯止めの効かないままに現在まで続し、ているよ 
うだ。このままでは，昔のようにブラリと入っ 
た窨店で気の向くままに本を選んで買って帰る 
といった，気軽な楽しみか育われてしまうかも 
しれないし，このことは都会の書店を見ていて 
そう感じるのだから，地方の都市ではもっと切 
実な問題なのかもしれない。 

学生の頃はよく，わからない言葉や数字があ 
ると図書館に行くのがおっくうで，近くの害店 
に飛び込んでは立ち読みで用を済ませたり，さ 
らには，関係のない本までついでに読ませても 
らったりと，本を買う以外の目的でずいぶんと 
利用させてもらったものだが，現在のように害 
店に並んでいなければならないはずの多種多様 
な If 報源とも言える書籍類が，軽薄短小の_ 
の流れとともにしだいにその立場を弱められて 
しまうことは，たとえどんなに質の高いもので 
あってもそれを知ってもらう場所を与えられな 
いままに終わってしまう事にもなリかねないの 
ではないだろうか。 

何年か前，私がまだ学生のときに，ある文芸 
誌の編集者と偶然に酒の席で一緒になったこと 
があるが，そのときに酔った勢いで初対面の私 
に向かって，これからの文芸誌のありかたがど 
うしたこうしたと，延々と弁舌を振るわれて辟 
易としてしまったことがある。しかし,その中で 
一言だけ「自分達の仕事は，常に時代の波にも 
まれながら仕事をしているが，その波がひいた 
あとにどんなに小さなものでもいいから残すこ 
とができれば最高なんだけれど……」と言って 
いたのを今でも覚えている。 

今になって考えてみると，その頃すでにそう 
いった仕事の現場では，一種の危機感のような 
ものが存在していたのだろうが，その一515を最 
近になって新聞の紙面から思し、起こすことにな 
ろうとは思ってもみなかった。もう読害の秋と 
いうにはあまりにも風カヾ冷たくなってしまった 
が，そんなことでも思い出しながらこたつのな 
かに入って，偶然に見つけた1の本にゆっく 
りとつきあうゆとりを，これからも忘れないで 
いられればと思う。 （ N ) 


■ バックナンバー常備店 


東京 

神保町 

E 省堂神田本店 5F 
03(233)3312 


〃 

窨泉ブックマート BI 
03(294)001 1 


II 

書泉グランデ 5F 

03(295)001 1 


八重洲 

八重洲ブックセンター 3F 
03(281)1811 


新宿 

紀伊國屋害店本店 
03(354)0131 


渋谷 

東急ハンズ寿楽洞 7F 
03(464)4604 


池袋 

西武百货店マイコン売場 9F 
西部ブックセンター 1 IF 
03(981)0111 


調布 

真光窨店 

0424(87)2222 


町田 

東急ハンズ寿楽洞 
0427(28)2782 

神奈川 

横浜 

有隣堂ルミネ店 

045(453)081 1 


|定期購篇のお知らせ 

定期購読の申し込みをお受けしています。 
本誌が手に入りにくい地区にお住まいの方， 
毎月購読していただいている方，入手確実な 
定期購読への加入をお勧めします。詳しくは, 
本誌とじ込みの振替用紙をご覧ください。 
バックナンバー在庫状況 
，85 4，5，7, 8，9，10， II ，12 

以上の在庫がございます。. 
バックナンバーのご注文はお近くの窨店か 
らできますが，どうしても入手しにくい場合, 


神奈川 

横浜 

横浜窨店 

045(241)5445 


藤沢 

有隣堂藤沢店 
0466(26)1411 


厚木 

有隣堂厚木店 

0462(23)41 11 


平塚 

文教堂四の宮店 

0463 (54)2880 

千葉 

柏 

新星堂カルチェ 5 
0471(64)8551 


船橋 

西武ブックセンター I0F 
0474(25)01 11 

大阪 

都島区 

駸々堂京橋店 
06(353)2413 


北区 

旭屋窨店本店 4F 
06(313)1191 

埼玉 

川越 

黒田書店 

0492(25)3138 


川口 

岩渕窨店 

0482(52)2190 

茨城 

水戸 

川又窨店駅前店 
0292(31)0102 

京都 

中京区 

オーム社窨店 
075(221)0280 

長野 

飯田 

平安堂飯田店 
0265(24)4545 


直接弊社へ現金書留にてご注文ください。な 
お，郵送料は冊数によって異なりますので， 
前もってご連絡ください。お問い合わせは，出 
版営業(»03-26 1-4095) 宛お願いします。 


海外送付ご希望の方へ 

本誌の海外発送代理店，日本 IPS ㈱ にお申 
し込みください。なお，購読料金は郵送方法, 
地域によって異なりますので，下記宛必ずお 
問い合わせください。 

日本 IPS 株式会社 

〒101東京都千代田区神田小川町 3- 5 
«03(291)2632 


■hilllZi 月号 

■ I 986年1月1日発行定価480円■発行人孫正義■編集人田鎖洋治郎 
■発売元（株）日本ソフトバンク 

■出版部〒1〇2東京都千代田区四番町 2-1 003(261)4095 FAX 03(262)8397 

編集室 003(265) 5808 
出版営業》03(26丨）4095 
広告営業 003(255)9677 

■本社亍102東京都千代田区九段南 2-3- 14靖国九段南ビル 003(263)3690 胱 
TELEX 東京 232-46 I 4 JSBTYJ FAX 03(263)3660(^ 

■大阪支店亍542大阪市南区難波千日前 5-19 河原センタービル 3 F 
006(644)0191 肋 FAX 06(644)0160 
■印刷凸版印刷株式会社 

©1986 SOFTBANK C 0 RP . 雑誌02179- I 本誌からの無断転載を禁じます。 


220 Oh ! MZ 1986.1. 


















ノ 、°ソコン K 間の目を守る。 痛_ 


#コントラストの向上によって明るさを 60 %にセーブした 
見やすく、疲れない画面が得られます。 

•文字の揺れ(フリッカー）現象がなくなります。 
•家庭用テレビにも大いに効果があります。 


視力障害解消/ 


オフィスコンピュータやパソコンの急速な普及にともない、それらのディスプレイ装置 （ VDT = ビジュ 
アル•ディスプレイ•ターミナル）の操作による目の疲れや肩こり、また精神障害まで、新しい職業病 
として注目を集め、新聞•テレビなどでもとりあげられて社会問題となっています。 

シーレックスでは、東レ•レンズ開発研究所との共同開発による「ハイコントラストレンズ j を完成。快 
適なコンビュータ•ディスプレイ操作を、可能にしたのが『シーレックス•コンピュータグラス J です。そ 
の優れた特徴は、レンズ基材内部とレンズ表面に特殊加工を施し、ディスプレイから発散される目 
に有害な光線を、完全に吸収カットします。文字のちらつき（フリッカー）をなくし、カラー画像の色相 
をそこねないレンズ色です。また、装着感のよいフレームで、メガネをかけなれない人にも安心。眼 
精疲労を防ぐ、画期的なメガネです。 


軽る〜いカーボン新登場！ 

カーボンファイバー(炭素縱維）は、宇宙工学材料として開発され 
た素材で、軽さと強さ、しなやかさが特性です。いまやロケットをは 
じめ、さまざまなスポーツ用品にも活用されています。まさに、コンビ 
ュータグラスフレームにもぴったりの特性です。 



度付きメガネにクリップレンズ 


籲取り付け取り外しがワンタッチ 


f 小学生までのお子様及び中学生•女性の方でも顔の小さい方は、、 
U サイズとご指定下さい。 / 

CG -1000¥13,000 を 特別価格¥9,800ふ!^「ス付 

r コンピュータグラスのベストセラー 


00 



J 



CG - 400 


(どんな形の眼鏡にも装着できるフリーサイズです 0) 

CG -600 ¥ 6,000 を 特別価格 ¥ 4，800 布製ケ-ス付 ( 送料込） 


(男性•女性•大人•子供の区別なくご使用出来るフリーサイズです。） 

CG -400¥6.000 を 特別価格 ¥4,800 ハードケース付(送料込） 


* 郵便番号 
♦住所 
参氏名 • 捺印 

暑年 m 

• TEL 

| CG-400.CG-1000 或い I 
は CG-600 購入と明記| 
I の上お送り下さい = 


□ 


〒9 

10 

㈱ 

福 

シ 

井 


5枣 

公 

P 


1 

5 

3 


通信販売をご利用下さい.グ 


お申し込みは左記要領でハガキでどうぞ。 
商品到着後、郵便振替で1週間以内にお 
支払い下さい。 


seelex 

本社 / 〒 910 福并市二の宮 5 丁目 14-3 0 (0776)25-211Ht' 
営業所 / 東京 • 大阪 • 名古屋 • 九州 • 福井 • 東北 • 新潟•北海道 





























MZ-1P17 


(5，FD) で 


■カラーハードコビーができる （MZ -1 P 1 7対応） 

•〔 BASIC 〕 で作成したグラフィック M 形を（キー〉を押すだけで、乂〔嬉楽阐〕で描いた 
絵でも （ Utility 使川で）簡単にカラーハードコピーができる。 

• (キー）を押すだけで、テキスト碑|而とグラフィック ㈣ 曲•を合成した、カラーハードコピ 
一ができる。 

•カラーハードコピーの大きさを4段階に指定できる（キー操作） 

• 作成した絵の色を4色（黄、紅、 W 、 揲）に分解し、それぞれの色を抽出して、カラー 
印刷ができる。 

• I ••記のれ特長を 1 つの 〔 BASIC コマンド〕 として、プログラムの 中で 使える0 
■有名マイコンショップで、その美しさに感動して下さい.>7 
■必要システム構成 
•本 体： X 1 ターボ （ 5 ' FD ) 

•プリンタ： MZ -1 P 17 
•ケープル： MZ -1 C 48( X 1/ ターボ用） 

•カラーリボン： MZ -6 P 17 

6,000円 


ス■パ■カラ -BASIC 


SUL 、発想 





XI turbo SC/CS/CK 


■グラフィック図形を上下左右、自在に動かせる 

• BASIC コマンド 〔 MOVE 〕 を使って図形を勋かせるのはもちろん M ね合せた色の中 
から指定色だけを動かせる事ができる。 

■鮮明カラー36色高速ペイント 

• 0〜35の数値を入れるだけでコマンド 〔 PAINT @〕 で中間色を含め36色の多彩な 
色が簡准にしかも超萵速でペイントできる（テープ用及びノーマル 5' FD 用のみ〉 

• ターボ) H は诊~ 71の数値を入れるだけで PAINT コマンドで72色の多彩な色が簡 
中•に超必速でペイントできる。 

■部分的にパレットができる 

•指定した範囲内の色を指定色に自由にパレットできる。 

(但し、本来のパレット機能より処理速度は遅い〉 

■グラフィック図形が反転できる 

__面上の!^形を上下、左右逆に表示することができる。 

•上下、左右対称の図形は、半分描けばコマンド 〔 REV 〕 で簡単に反転させて、一つ 
の図形ができる。 

■色を反転させることができる 

•指定した範開内をコマンド 〔 RCOL 〕 で自由に色を反転できる。 

■完全上位互換性で使い方が簡単 

•テープ用は （ CZ -8 CB 01)、 ノーマル 5， FD 用は CZ -8 FB 01)、 夕ーボ用は （ CZ - 
8 FB 02) をサポートしていますので、コマンド、ステートメントはそのまま使える。 

(詳細マニュアル及びサンブルブログラム付） 

テープ 用： 6,000円 
5 F D 用： 8,800円 


通信販売のお知らせ 

>機種名及びテープ、 QD 、5 FD かを明記し、住所、氏名、丁 EL を記入の上 
現金書留（送料サービス）にて送付じ r 下さい。 



MZ-1500 


■グラフイツく 


/ク図形を±下左右、自在に動かせる 

• BASIC コマンド 〔 MOVE 〕 を使って W 形を動かせるのはもちろん M ね合せた色の中 
から指定色だけ觔かせる事もできる。 

■鮮明カラー36色高速ペイント 

• 0 〜35の数値を入れるだけで、コマンド 〔 PAINT 〕 で中間色を含め36色の多彩な色 
が簡単に表現できる。 

■色を反転させることか" T きる 

•指定した範 M 内をコマンド 〔 REV 〕 で ft 由に色を反転できる。 

■グラフィック図形を反転させることができる 
面上の図形を上下、左右逆に表示できる。 

•上ド左右対称の図形は、半分描けば、 コマンド 〔 REV 〕 で簡単に反転させて一つの 
図形ができる。 

■一つのコマンド 〔 WINDOW 〕 で6機能 

♦一つの N 形を任意の位置へ同じ図形を表示できる。 

參輿った M 形の表示位遄を交換することができる。 

•指定した範囲の図形を見えなくする。（マスク） 

•兒えなくした範囲を解除（マスクの解除）し元の M 形を見える様にする。 

隹その他 

■完全上位互換性で使い方が簡単 

•標準 BASIC ( MZ -5 Z 00 1) をサポートしていますのでコマンド、ステートメントはその 
まま使える。 


(詳細マニュアル、及びサンプルブログラム付） 


QD 用： 6,000円 


MZ-2Q00/SS00 


■グラフイク図形を上下左右、自在に動かせる 

• BASIC コマンド 〔 MOVE 〕 を使って M 形を動かせるのはもちろん廣ね合せた色の中 
から指定した色だけを動かせる。 

■鮮明カラー36色高速ペイント 

• 0〜35の数値を入れるだけでコマンド 〔 PAINT 〕 で中間色を含め、36色の多彩な色 
が簡 m に表現できる。 

■色を反転させる事ができる （ QD 用のみ） 

•指定した範网内をコマンド 〔 RCOL 〕 で自由に色を反♦云できる。 

■4 オクターブ3重和音 

•今までの MZ - 2000系 BASIC になかったコマンドです。 

■首葉が括せる 

•コマンド 〔 TALK 〕 で ローマ字 読み入力で喋らせることができる。 

■使い方が簡単 

♦命令はすべて BASIC ですから初心者の方でも簡単に使える。 

• テ ー プは MZ -1 Z 抑1を、 QD 用は MZ -5 Z 007の標準 BASIC をサポートしています 
ので、完全上位互換性を保って、ます。 


(詳細マニュアル（テープ用は説明害）、及びサンブルブログラム付） 

2000 用は要 G-RAMI . II . m . 

テープ 用： 4,000円 
Q D 用： 6,000円 


〒546大阪市東住吉区湯里1一1一1稲田ビル403号 

マイコンシステム企画 
電話大阪06 (704) 9923 






















入金伝票 


その日の処理は 
その日のうちに， 


出金伝票 


士訳日記帳 


価格 

¥ 48,000 


.伝票を仕訳日記帳へ 
記帳する要領にて 


I 入力はコード入力で早/くて簡単 
.データの訂正•追加 • 削除 OK ! 
多登録科目数160科目 
1800仕訳/月の処理 
ICRT 上にて全財務緒袠表示 


科目コードー覧表 





















最高160科目 



総勘: 

定元帳預金 




1 .… ニニ 



総勘定元帳売上 


(株）ヒサゴ製 

元帳用紙 No .241 使用 


振替伝票 


入力 


現金出納帳 


漢字コ 


貸借対照表 


最高160個 


損益計算書 


総勘定元帳仕入 



全霊 


美高雷 

ほ 

































































































合計 





合計金額10億円未満 

★入力終了後即各財務緒表作製可能 

プリンターはシステムでサポートしているものを使用 
( MZ -1 P 10 A 用は高速高品位印字） 

★ MZ -1 P 11 A 、 UP -130 K 用は碁線付高速高品位印字を 
55,000円にて別に用意しています。 


天草パソコンセンター 

お求めは 

ウラカワ電器店 

お近くのパソコンショップ又は 

熊本県本渡市亀場町亀川16 9 3 _1 

シャープ製品取扱店へ 

電話0969—23—2813 

※直販の場合は送料サービス 
























































































































































































































































































厂 IB ビットポード付111親__ 

/____ パーソナルコンピュータ/ 


MZ-1M01 + MZ-1T02+MZ-LOGO 

合計236,600円が 

たったの 


65,000 円 / 

( 機能アップグ） 

•膨大なアドレス空間を確保。： 

籲処理能力が飛躍的にアップ/ 
•豊富なソフトをそのままサポート。 

• I6X 16ドットの見やすい漢字表示。 


1 B ビットパーソナルコンピユ 


■11 Z •国国®® 

本体 ( MZ .5521)¥388,000 を 

大特価¥148,000 

本体 ( MZ -5511)¥288, 000を 

大特価¥109,000 


_ — - " ノ•一 .一ニ ノー 





OillMMi 


周 辺機器 

囑 •••••• ¥ 12,00大特価 ¥10,000 

• 増設 i ビ•矛 RAM (MZ イ R09) … • ¥ 35,0004大特価 ¥ 25,000 
I■字 BQ _AZ:1B10) . ¥30,000今大特価¥彳8,000 

飞匪®! 0004 大特価 ¥40 , 000 
_ 1 - H-^WOO 4 ±m ¥ 26,000 
• 増設 RAM (MZ-1 R16F T：T::：7：7 n(rT00O4 大特価 ¥ 26 ， 000 
•日本語ワープロ (MZ-2Z025) … . ¥ 49 , 000 4大特価 ¥ 26 , 000 
•統合化ソフト Today (MZ2Z014) • ¥ 68 , 0004大特価 ¥ 35 , 000 


最少の投資で*最大の fl 値を 


0 


パソコン、周辺機器、ソフトなどブロの目で選んだ一級品ばか!3を限界価格でお届けします。 
マイコンライフをよりグレードアップしたし、と願ってし、るあなたにとって耳よりな情報ばかりを满載/ 
本誌発売時には、下記価格表よ D 、 さらにお求めやすい価格に変更されてし A る場合があ D ます， 


新製品 / Super MZ 

•シャープ MZ - 2500シリーズ 

Model 30( MZ - e 521)-¥ igB .000-> 


年 
大 

XlturboII(CZ-85BC)¥178, 00 〇呤特 

里 

MZ -1500. ¥39,800 

•シャープ CZ -850 C . ¥ 168,0004 ¥75,000 


XIシリーズ年末謝恩特価 

例えば、セットの場合 
• X 1 F モデル10+14インチ カラーモニター (RGB ケープ M 寸） 

. . ¥154,6004 ¥99,800 

その他、 XI モデル10、 2 CU 1 turbo モデル10、20、30、40 
年末謝恩特価販売/ 


• NEC PC -9801 E . ¥ 2 1 5,0004 ¥ 149,000 

モニター 

• シャープ MZ -1 D 10 (4050 文字)-¥41 ; 8004¥28,000 
• シャープ CZ -801 D (カラー）•……¥ 99,800呤 ¥59，800 
(640 ドット.チューナー付、14イン？ 1 ) 

• PC -8047( アンノ くーイエロー)… . ¥46,8004¥18,000 

• NEC PC -8052( カラー) . ¥118,0004 ¥39,800 

(ドットビッチ0.39 m / m 、 RGB ケーブル付〉14インチ 

• NECPC - TV 151 (カラー) . ¥ 94,800今 ¥53,000 

(510ドット、 RGB ケーブル付）15インチ 

• NECPC - KD 552 K (カラー)…¥112,0004¥59,800 

(トットビッチ0.39 m / m > 14インチ 

• NECPC - KD 551 K (カラー)……¥ 99,8004 ¥69,800 

(64 P ドット〉 

•シャープ CZ -150 DS (カラー TV )_. ¥ 98,000今 ¥54,000 

(640 ドット、 RGB ケーブル付）15インチ 

•シャープ 20-202 C (カラ-)……¥ 168,000今 ¥48,000 

(6^0 ドット、 RGB ケーブル付） 2 CK ンチ 

•東芝1 4 V 20 F < W > (カラー) . ¥ 99,800今 ¥54，000 

( RGB ケーブル付〉14インチ 

•ナショナル TR 120 M 1 C (グリーン). • ¥ 46,800 4 ¥ 15，000 

(2000 文字、ケーブル付）〗2インチ 

• シャープ2000文字 CU -14 F 1 ..…¥ 64,800今 ¥39，800 
• シャープ4050文字 CU -14 H 2 … • ¥ 99,800 4大特価/ 
#シャープ4050文字 CU -14 A 1 …4 128,0004大特価/ 
(アナログ. RGB 対応 PC - 9800シリーズ対応） 

•シャープ 15 M -412 C (カラー)… • ¥ 丨 18,000今¥44,800 
(640 ドット、 RGB ケーブル、チルト台付) 


プリンター 

• シャープ CZ-81P (X佣カラ-プ□ッタ—プリンター） 

. V 34,8004¥13,800 

•NEC NM 9400 -(136tt) ….… ¥3IO,OOOH>¥165,000 

• NEC 漢字 PC-PR104. ¥ 148,0004¥92,000 

• NECPC-6022. ¥39,8004 ¥9,800 

•シャープ MZ-1P09. ¥47,600今 ¥30,000 

(1500用ヶーブノレ付〉 

• シャープカラープリンタ MZ-1 P17-V 79,8004 ¥67,800 
•シャープ CZ 80 0P(X1 用）…….¥ 142,8004¥49,800 
• シャープ MZ-1 P07. ¥ 95,000 4 ¥ 79 . 500 

• シャープ MZ-1 P01(MZ-700 用 ）.. ¥ 39 , 800 4 ¥ 15 ， 000 

•CZ8PD2 ドットプリンター . ¥ 79,8004 ¥49,800 

•日立 MP-1041. ¥ 169,8004¥85,000 

•シャープ MZ-80P4B (136 桁) . ズバリ ¥79,500 

拡張機器他 

• PC-6601-01 (拡張漢字 ROM). •. ¥ 24 , 800呤 ¥ 14 ， 800 
•シャープ拡張1/〇ボード 

MZ-1 U01(MZ 2000用) . ¥ 37,000 4 ¥27,800 

• MZ- 2200用キーボードのみ . ¥12,000 

•シャープ MZ8BG. ¥ 39,000今 ¥19,800 

•MZ-8GBK(MZ80B 用） . ¥39,0004 ¥22,000 

• シャープ MZ8BG K. ¥ 19 , 800今 ¥ 18 , 000 

• シャープ MZ-80i/0(80K シリーズ用 ).¥29,5004¥15,000 

• シャープ!字 ROM ボード MZ-1R13 …….¥41 ; 8004¥35,500 
•グラフィック RAM MZ-1R02X2 …¥ 16,000今¥11,200 
籲シャープ MZ-1R01+1R02X2 ….¥55,000今 ¥28,000 

•CZ8KR(X1 用） . ¥32,000今 ¥17,800 

•CZ-8VC(X1 用 ) . ¥ 15,800 今 ¥13,400 

•パソピア PA-7245(32K). ¥40,0004 ¥28,000 

•日立 MP-1802A (ィンターフェース)…"¥ 15,0004¥7,500 
•MZ- 2000シリーズ 232C カード…¥ 19,800今 ¥16,800 

• FM8 用 232C 力ード . ¥ 30,000呤 ¥ 24，000 

籲パワースプライザー(各種パソコン/7 ロッピーに使用可） 

(12V 0. 1 Ah • 1 2V2Ah- 5V2.5Ah). ¥1,500 

• シャープ CZ-_ (XI用拡張ボックス） 
.¥29,800H>¥14,800 


フロッピーテイスク 

(インターフェース • ベーシック付） 

シャープ CZ •的 0 F (在庫限) •……¥79,800 
日立 MP 35 B 0 ¥75,000 

••¥158,0004¥98,000 
•¥129,800今 ¥105,000 
•¥198,0004¥138,000 
•…¥39,8004 ¥25,000 
.¥28.000 


參シャーフ MZ -1 F 07. 

參シャープ CZ -501 FM 用)… 

• NECPC -9831-4 W . 

•NEC PC -6601 FD 1. 

會ティアック FD 55 B (増設用) • 


その他 

• MZ -2 Z 004 (F DOS ). ¥ 50,0004 ¥42,500 

• MZ-LOGO . ¥9,800今 ¥4,500 

•XI NEW BASIC 111 SF . ¥ 8,8004¥7,500 

• ニデコ. カラーボード NH - MZD 2 ( MZ 80 K/C 用） 
. ¥69,8004¥10,000// 

16ヒットボードキット 
MZ -1 M 01+ 漢字 ROM . ¥26,000 


北 海道から沖縄まで 

I 創菜26年の信用と実嫌が安心をお届けします。| 

★ 送料はご注文の際にお問い合わせドさい。 
★ 当店では中古品は扱っておりません。 
★ ご注文は在庫を確認の上、税金邦留または 
銀行振込でお申込下さい。仝商品、クレジッ 
卜でも扱っております。 

★ お申込みの際は必ず屯,活番りを叫紀して 
ドさい。 


全国 

通信 

販売 


アイヒ外鼋子㈱ 

営業所：〒192東京都八王子市北野町 560-5 

S042B-45-3001-3 

S03-545-0022 FAX.0426-44-6002 

•営業時間：10: 00〜19 : 00 
•電話受話： 20 : 00迄可 
•定休日：日曜日 


■本誌の前号、前々号の広告もご参照ください。 
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テーフ版の IPL •ソフトをワンタッチでディスクに引き上げる 
HYPER DISK MONITOR が、 

ついに EXTRA HYPER に進化しましだ。 

専用の DATA DISK にテーフ版ソフトを収容するので、 

2枚、3枚と追加使用するとあなだのライフラ 1 J — がどんどん広がります。 
EXTRA HYPER で扱えるソフトの種類はなんと125にもなりましだ。 
もちろんシングル • ドライフでも使えます。 

XY /7 ( 要 G - RAM ) 

EXTRA HYPER (DATA DISK 1 枚付） 
5 ， FD《FD 各 ¥10,000 


お近 < のマイコン • シヨツフでお求め、又はご注文<ださい。詳しい内容をお知りになりだい方は営業部までお電話<ださい。 （ AM 9 : 30〜 PM 5 : 30。日曜、祭日は除く） 
当社直接の場合は営業部へ現金害留か郵便振替（東京6— 123648株式会社フルー•スカイ）又は銀行振込み（第一勧業銀行自由が丘支店普通109962 9) でお願いします。 
振替や振込みの場合は、住所•氏名 • 電話番号*商品名 • 機種名 • メディア名を八ガキでお知せ < ださい。商品送料は不用です。 



株式会社 BLUE SKY 本社亍411靜岡県三島市加茂 16-4 営業部〒152東京都目黒区緑が丘 2-17-1 7電話 03—724-7980 



■11Z ■皆® 0© シリーズ 

H . S コント□ーラー(テーフ版 IPL •ソフトがディスクに入る) 5 M"FD ¥9,600 
修理屋さん(ディスクなどに直接機械語が書ける） 5 M"FD ¥4,600 

H . S 4200 (1 枚のディスクを12分でテープにバック•アッフ )5 M"FD ¥7,400 

シリーズ 

漢字 DEVICE MONITOR for TURBO 

(ディスクなどに直接機械語が書ける。ターポ専用） 5 I 4 〃FD ¥5,600 
修理屋さん(ディスクなどに直接機械語が書ける） 5 KTD -3 TD 各¥4,600 


宇都宮の本格的な 

じ.' :) マイコンショップ 




tajrltj シリ- 


本格的各撞インターフェースボード 


FAt>LA 


発売中 


■ド テイスクイン ターフェースボード (XI ターボ用） 

XIターボで 10MB のハード 
ディスクを使用するインター 
フェースボード 
NEC、 アイテム、ロジテック 
その他 PC98 用 10MHD 



型番 KGB-HDIF 定価 ¥ I 8,000 
_ ケーブル定価¥ 8,000 J 


■ 絶皤型パラレル入出カボード ( X1 、 X1 ターボ、 PC98 用） 

入力数8入力2ポート 
出力数8出力2ポート 
入出カフォトアイソレーション 
入力電圧 5V 〜 18V 
出カオープンコレクター 



型番 KGB - PIO ( XI ) 
KGB - PIO (98) 


定価 ¥52,000 
予価 ¥52,000ノ 


■ アナログ:デジタル変換ボード (XKX 1 ターボ、 PC 98 用） 



16ch12 ビット分解能 
入カインピーダンス 2MQ. 
サンプ;レ/ホールド付 
変換速度25バ S 
入力電圧4種類 


型番 KGB - AD 12( X 1) 定価 ¥ I 48,000 
KGB - AD 12 C 98) 予価 ¥ 丨48,000 


■ デジタル • アナログ変換ボード ( X 1 、X 彳ターボ、 PC98ffl) 



4ch12Bit 分解能 
電圧出力土 10V (標準） 
ラッチ回路付 


型番 KGB - DA 4( X 1) 定価 ¥ 128,000 
_ KGB - DA 4(98) 予価 ¥128,000ノ 


■ GP-IB インターフェースボード (xuxi ターボ用） 近日発売 


型番 KGB - GPIB ( XI ) 予イ面¥68,〇〇〇 


ンて、計測制御をしよ 


9 POMZ ともテスト用プログラム、回路図、説明書付 


起低価格でホビーから本格応用まで可能// 




貴殿の考えているシステムが可能かどうか無料でコンサルティングします) 


アナグロ 

INPUT . 


[DC 


モータト 


E 力!一 

1 S S R 卜 

tc - 力 h 

| ソレノイト' 卜 

^ * h 

|L E Dh 

a . a 

1 リミット sw (- 

a 向 [- 

1 光センサー！- 

u 音 h 

|スイ v チ！一! 


パラレル 

1 OUT 


バラレル 

INPUT h 


8CH 
8bit 
A D 変換 


24b it 

パラレル 

INPUT 

OUTPUT 


PC-800 I * 

PC-800 I mk II 
PC-880 I 
PC- 8801 mk II 

各バソコンの 
スロットへ 

700 在 
1500 
80B 
2000 
2200 


=> 


MZ 

MZ 

MZ 

MZ 

MZ 


型番 KGB-PCI 

定価 ¥19,800 

※専用の l /〇 BOX 

が必要です 

型番 KGB - MZ 1 

定価 ¥19,800 


BASIC HOUSE SOFT 


5 周年記念全ソフト 20%QFF 


PC -9801 用アブリケー シヨ ンソフト 
POSEET ( pc-pal 日本語版) 

型番 B9-6501 定価 ¥30,000 

本ソフトは PC-PAL 日本語のデータプリント 
アウトユーテイリテイソフトで最大印字桁数 
が310文字まで縮少文字を印字する事ができ 
ます。 


* PC- PAL 日本語は㈱大塚商会の製品です。 


システムソフトウエアコンバづ 

馬兵ひジ八し-ノト .. . . .. . DAStC HOUSE — 


— 


がソフトだけで mZ -_ QDQDIllZ - gg _ PC -80 in に早変り.ゲ 


システムソフトウェアコンバータ第 1»// B 6-22 I 3 IHZ-^MXSBASIC 

システムソフトウェアコンバータ第 2 蘀// B 6-22 I 7 L 0 G 0 and PASCAL 

システムソフトウェアコンバータ第 3 弹ガ B 6-22 I 8 システムプログラム and マシンランゲ- ジ 

システムソフトウェアコンバータ特別企面// B 6-2220 N-BASIC 
XI テイスアセンブラ B 6-2 I 09 Z 80 逆アセンブラ 

MZ -1500 テイスアセンブラ B 4-2 I 0 I Z 80 逆アセンブラ QD 版 


機種： X|、X1C；X1 夕ー ボ 定価 ¥3.800 
機種： XKX1C 定価 ¥4.200 
機種： XKX1C 定価 ¥4.200 
機種： XKX1C 定価 ¥4.800 
機種： XKX1C.X1D 定価 ¥4.200 
機種： MZ-1500 定価 ¥4.800 


二斉種 BASIC テキストコンバータ 總贊 発売中./ 

\ DC. 14 〇 *) w onn t - 7nn nr* .onn i inn 


XI PC-8001 -C2-800 B6-I483 Y 3.800 MZ-700 PC -800 1 -MZ 700 85 1483 Y 3.800 

PC-8801 -CZ-800.B6-I493 Y 3.800 PC -8801 *MZ-700 05 U93 V 3.800 

MZ 80B-2000 -CZ-800.B6-I4I3 Y 3.800 PC- 6001 -MZ-700 851473 V 3.800 

MZ-80K C-I200-CZ-800 86*1433 Y 3.800 

PC-6001 *02-800.B6-I473 ¥3,800 


定価 ¥3.800 


はじまって以来の超大作 ADVENTURE GAME 

画面数 120 枚の起大作アップル風本格的アドベンチヤーゲーム ヒント集ぁります ( 送料丫圃 

I ~ AUTOCRACY J 絶賛発売中/ 定価 ¥3,8 〇〇 


XI turbo で本格的なテータ通信をとうぞガ 

TURBO NET 5 インチ 2D 


TURBO NET 通信ソフトは';中電気、日立、 NEC 、 田村電機、 
シャープのインテリジェントテレホンをサポートしておりま 

す。カプラーも OK 。 定価¥ 12,800 


おわび 

システムソフトウェアコンバ 

一夕 (26-2213) が) (1 turbo で動 
作せず、ご迷惑をおかけしま 
したが XI turbo でも使用でき 
るようになりました。 



♦当社の製品はお近くのマイコンシヨツプ等でお求め下さい 
また、製品等に関するお問い合わせは直接当社へお願いい 

たします。_送料ソフト ¥200 ハード ¥500 


マィコンショッ プ ^^515 

〒320宇都宮市桜3 丁目2 — 17太平ビル 
£?0286-33-1994 3 F (株）計測技研 

FAX 0286-34-1264 4 F AD CORPRATION 





















































































































信用と実績を誇る 

LMyiiiMj ゥゥサ 


/ n 商品ついに// 宇都宮の本格的なマイコンショップ 

■雷 IS —： kTHK 





■電話一本で nK 
■もちろんクレジットも大勧迎 ( B 〜 BO 回） 


BASIC HOUSE 5周年記念特別企画特価セール 


限定100本先着順に 〆 切致します。 
■ SUPER MZ MZ - 2500用 128 KB 増設メモリ 

SHARF^、128KBli 設メモ 1/ 
(MZ-1R 26 定価 ¥35,000) 

のものとコンパテ 


型番 KGB128KBMZ ⑯ ¥9,800ノ 



限定50台先着順に 〆 切致します。 


■XIturbo 用5インチ 2 HD /2 DD 両用ドライブ 

※之叩〇 .2MB)、2DD(640KB) を彳台のド 
※ユ動: 替コ i バ—夕付 
例 PC98 ごシリ-ズXI夕-ボ 
^MS-DOS ファイルコンメ く-タオ プシ ヨン 

型番 KFD-2HD/2DD-2(2 ドライブ)¥ 128,000 
⑱ KFD-2HD/2DD-1(1 ドライブ)¥ 79,800 


■限定販売 


■限定販売 


■限定販売 


■限定販売 


XI シリーズ 


XI ターボシリーズ 


X 1 F シリーズ 


SUPER MZ 


CZ -803 C 


モデル 30 セツト 


モデル 10 セツト 


モデル邪セツト 


定価 119,800 特懾 49,800 


定価 407,800 特備 270,000 


定価 179,600 特価 140,000 


定価 306,000 


CZ -804 C 


モデル 40 セツト 


モデル 20 セツト 


128 K 巳増設メモリ付 


定価 139,800 特価 59,800 


定価 366.000 特価 260,000 


定価 229,600 特価 170,000 


特価 260,000 



シャープカラーディスブレイ 
2000 文字 CU -14 F 1 
定価 B 4, 昍〇特備 45,000 
4000 文字 CU -14 H 1 
定価 99,800 特湎 69,800 
4000 /2000 CU -14 D 1 
定価 108.000 特籠 86,000 


PC -9801 256 K RAM 

#24,800 

ファミリーコンビューター 

⑱12,800 


衝撃の大ヒットウワサの商品ファミコンクリエーター(ファ S ク U) 


ファミコン XI クリエーター ■ XI シリーズとファミコンを接続して新しいファミコンの世界をクリエイトする。 


, ,、 、 ファミコン 

メモリープラス XI シリースプラスクリエーター 

力一ト リッジ +ィンタフ I ースヵード + XI 用ソフト 

¥29^800 ¥9,—800 5”2D ¥9,800 


セツト価格 ¥ 49,400 通 IS 特另！ J 価格 ¥ 39 , 500 ( 全国均一送料¥5〇〇 ) 



インターフエースカード インターフエースカード 


※当メモリーカートリッジは BASIC RAM カードとじ C も御使用出来ます。（テープで BASIC を起動い:ぃる方には最適です) 
※乂】シリーズの外部メモリーボードとじ C も使用出来、電源を切ってもメモリーの内容は変化しません。 


MZ - 的 B 、 2000、2500用、 PC - 册⑴シリーズ、 PC ■册〇トンリーズ、^) flSfi 日発売予定 



お申し込み•お問し、合せは S (0286) 33-1994 

亍320宇都宮市桜3丁目 2-17 太平ビル 3F ㈱計測技研 FAX 0286-34-1264 4F AD CORPRATION 




















































MIA BOOKS 





• XI マシン語プロクラミング入門 
• XI リファレンスノウト 
• XI 八イテツクファイル 

マシン語からゲーム作成ノウ八 
基礎知識から実践的活用法まで 
XI の総てを網羅した MIA の3 
xi シリーズ3部作をどうぞ御賞!! 


ウまで 


大メニュ， 
味ください 


プログラミング入門 


ルレンスノゥト 


八イテツクフアイル 


渡辺英行 • 沼倉均共著 
A 5 判 定価2,200円 （〒250円） 


杉浦勇 一 他著 

A 5 判 定価2,500円 （〒250 円） 


渡辺英行 • 高橋秀樹共著 
A 5 判 定価2,200円 （〒250円） 


本書は、 X 1 でマシン語を学ぶ 
ために必要な基礎知識から、実 
践テクニックまでを解説したマ 
シン語入門書です。 IOCS や I/O 
ポート、マシン語命令表などは、 
資料として見やすいように整理 
しました。既に X 1 でマシン語 
を使っている方にも十分活用し 
ていただけます0また、マシン語 
プログラムの開発用に、ェディタ 
•アセンブラのリストも公開。 


X 1 のすベての機^»説と、そ 
の活用のノウハウを一冊に盛り 
込んだテクニカル資料集。 X 1 
の一歩進んだ実践的活用法を学 
びたいというユーザーに、ぜひ 
おすすめします。 XI turbo に 
も対応/ 

内容： Hu BASIC の内部構造/ 
画面構成周辺 I / O デバイス/ 
PSG / カ セツ ト/フロ ツ ピー デ 
イスク /IPL ROM / etc . 


これまで最も希望の多かった項 
目を一冊にまとめました。内容 
はゲーム 作成の ノウハウ 0 LINE 
や PAINT などのグラフィック 
ス〇音声合成、エコーなどの効 
果音。開発ツールとして小型高速 
コンパイラ“ Stellar ” の全リス 
卜と使い方など、一味違います。 
特にアルゴリズムが重要な部分 
は BASIC TI 己述。 X 1ユーザ 
一に贈る最後のメッセージです。 


お求めは最寄りのマイコン•ショップ、 
書店へ。または郵送料を添えて下記へ 
お申し込みください。 

亍 150 東京都渋谷区渋谷 2-9- 丨 
青山田中ビル 
TEL.( 03 )486-4500 

MIA 

株式会社エム•アイ•エー 




















ROUND SYSTEM LABORATORY INC . 

EXPRESSION OF SENSMJTY * COMMUMCATION 

mz-mmm 『ス_ノ\°_1 

財務/テレビ元帳』¥128,000 

t かに超える高速多機能会計ソフトの誕生で t 。 

| MZ -2500 の大容量•超高速をフルに活用した 16 ビット用ソフトを逼 


SUPER MZ には「ス■パ■財務/テレビ元帳」今これに追随出来るものはありません/ 


① 1枚のデ、ィスクに6,000仕訳のデータが入り、これを1ヶ月分としても、12ヶ月分とじ T も使用出来る。 

② 勘定科目は補助科目を含めて600まで、全部自由設定。期中に追加、変更、割込が自由に出来る。 

③ 指定期間内であれば、以前の月でも来月でも仕訳データの入力、訂正、削除が出来て、処理時間なし。 

④ 仕訳データは日付順に入れなくても、仕訳日記帳も、元帳も、日付順、入力番号順の両方出せて、待時間なし。 

⑤ データ入力直後に電源が切れても、データの異常は起らない。誤入力のためデータが乱れても修復出来る。 

⑥ 他のソフトの様にデータ量が多くなると処理時間が数分〜数十分か、ること一切なし。いつでもすぐに出る。 

⑦ 摘要の漢字入力は辞書 ROM で文節変換、人名、地名も可。英数字、カナ入力も出来る上、パスワード入力は結合可能。 
(パスワードプラス機能） 

⑧ 階層メニュー方式、オールメッセージ、誤入力時の警告、コマンドの常時表示のため初めての人でも殆んど説明書不要。 

⑨ サンプルデータ付のため、入手後すぐ全機能のテスト、プリント、データ入力の練習も出来る0 

「スーパー財務/テレビ元帳」は今やあらゆるコンピュータ用会計ソフト中最高位のもので、これより高価なものでも、とうてい及 
びません〇これは SUPER MZ の優秀性とラウンドシステムの会計処理のキャリアの相乗効果とも云えま t ■。経理事務の実務上 
のことを十分に配慮し T ありますから、実務家各位には十分ご満足頂ける内容で1■。但し全く簿記も分らない方は、その方の勉 
強を一寸だけお願いします^ (全自動仕訳と云うものは世界中にありません。） 


適合機種 

あらゆる業種、法人、個人、特殊法人、組合、団体 

画面出力 

テレビ元帳、テレビ試算表、テレビ B / S ， P / L 、 

テレビ仕訳日記、テレビ予算実績対比、 

テレビ資金繰実績、当月、通期利益表 

勘定科目 

全部自由設定、簡易科目名漢字入力、カナ漢字変換 

補助科目 

任意の科目に任意の数の補助科目設定可 

勘定科目数 

補助科目を含めて600個まで 

印刷出力 

総勘定元帳、補助薄、試算表、貸借対照表、 
損益計算書、仕訳日記帳、資金繰実績表、 

予算実績対比表、その他 

仕訳件数 

1枚のディスクに6,000件、最大12ヶ月分に自動配分 

金 額 

1 件、合計共 99 億円まで 〇( オプション 999 億円） 

摘 要 

漢字12字、カナ24字、パスワードブラス機能 

オプションソフト 

特殊法人決算書、部門別利益計算書、工事台帳、 
手形管理、固定資産台帳(予定） 

マスターファイル 

自動月次残高算出機能付ランダムファイル 

データファイル 

超高速日付順検索付ランダムファイル 

機器構成 

MZ -2500 FDX 2、128 KB 増設 RAM 
MZ -1 D 22( CRT ) 又は同等品 

MZ -1 P 18( 漢字プリンター)又は 1 P 10 A ，1 P 11 A ， 
1 P 06，1 P 03、 辞書 ROM 

使用 言語 

SUPER BASIC + 機械語 

演算速度 

16ビット機用ソフトの2倍強(当社比） 

プリンタースピード 

ブリンターの限界速度で連続ノンストップ 

提供メディア 

3.5インチ200フ乜ッピーテ、、ィスク><2 

プリンター 用紙 

全部普通のストックフォーム、元帳は専用用紙もあり 

附属品 

サンプルデータ、予備ソフト、ガイドブック 


スーパーシリーズビジネスソフトは、「スーパー給与」「スーパー販売/テレビ 台帳」 「スーパー 仕 入/テレビ 台帳」 等続々発表の予定です 0 
また熱心な自作派ビジネスマンのためにノウハウ公開の新 Q シリーズはオールランダム ファイルで 発表の予定で1-〇また MZ -80 B ， MZ -20 
00,2200用の「スーパー財務/テレビ元帳」(カナ)や「スーパー在庫管理」(カナ)や Q シリーズ、テープソフトなど引続きサポート中で I *。 詳 
しくは 「SHARP MZ APPLICATION 」 をごらん下さい。尚、当社は誇大広告や欠点を隠 U ： 売ると云ったことは一切ありません。不愉 
快な電話をおことわりしま業者取引はメーカー認定店に限ります^ 

資料のご請求は、ソフトの種類を具体的に指定の上、なるべく切手200円同封して下さい。 


総合カタログ MZ 版 ( No .3)〒200( No .4 は61年発行） 
★ユーザー直接のご注文を歓迎します(会員特典あり） 

D シリーズソフトのユーザーはスーパーシリーズは特別価格 

〈ご注意〉当社ソフトのレンタル、コピイ販売、用紙の複製、商 
標の無断使用はバチが当たります。 



〒560大阪府豊中市上野西 3-2-25 TEL 06(849) 6982 FAX 06(849) 6744 

5 M ラウフ尸 f / フ迅辦所 

鄄便振替口座/銀行口座 S 和銀行蓥中支店（普）313000 
大阪 5-95182 三菱銀行豊中支店（普）4323108 


※ご注意:テレビ元帳は当社の創作語で商標登録申請済でも(無断使用に重ねて警告します) 





























► し ODE RUNNER は米 BRODER BUND 社の登録商標て、す 0 



SUPER SOFT WARE LAB . 

muma m 

亍700岡山市下中野 519-1 TEL (0862)44- II 76 [年中無休 ] PM 丨 :00~ PM 7:00 
•通信販売ご希望の方は現金書留にて上記ユニバース宛ご注文ください。 

(送料無料サービス） 


キミたち、人気のロードランナーに、 
この秋、ひとつ仲間が登場/その名ち 
「チヤンピオンシップ•ロードランナー J 

ゴキゲン、痛快無比/ 

楽しさ120%のオモシロ SOFT 。 


ロードランナー 

MZ-1500 QD 版 定価 


5,200 


[ぉ知らせ] 

ロードランナーで遊びすぎたり、 QD (こ傷が付いたり、その他の 
事情で闽面データ （ B 而）が、うまく読み込みができな〈なった 
人のために、画面デ'ータ （ B 面）を作成するプログラム（メンテ 
ナンス QD ) をお送りします> 新しい QD にコピーして使うと何度 
でも使えま QD 代金、送料共 800 H 分の切手 N 封のうえ、 
左記メンテナンス QD 係宛送ってください。 

(注: A 面のプログラムは入っていません） 








« « シ单こイ中間力タナこ 


»》 


MZ -80 B - MZ - 2000/2200 • SS 27 - SS 57 turbo 

-価格59,800円 

ワープロ mini をお持ちの方は差額にて交換 


匸簡単な漢字変換:] 

これまでのかな漢字変換は、1文字単位又 
は、熟語単位に入力を行ない、そのつど変 
換する方法でした。これに対して NEW ミニ 
は、文節変換や一括変換ができます。一括 
変換は、文書すべてをかな入力し、その後 
漢字に変換したい所に力ーソル移動させて 
[ CR ] を押すだけで次々とかな漢字混じり 
文に変換するというものです。これにより 
キー操作力衝略かされて、スピーディな文 
書作成を実現し、文書作成中の思考の断続 
がないために、頭に浮かんだ通りに、気軽に文書が作れます。 

一度漢字に変換した後に、漢字位置で [ CR ] を抻すだけでひらがなに戻ります。 


かんじをかんたんににゅうりょくする。 

1 

■んじをかんたんににゅうりょくする。 

1 

澳字を■んたんににゅうりょくする。 

1 

澳字を簡単に_ゆうりょくする0 

I 

漢字を簡単に入力する0 


ワ - フ◊口 NEW mini 


[便禾 U な部首検索] - 

漢字の読み方がわからない時に、辞書から部首や画数で 一|、ノ乙 J 二-人几 

探すようにシステム内に200の部首ファイルを持ってお | 

り、目的の部首を指定した後、対応する漢字が表示され、 哀亥棄亨享京牽交商充 

その中から漢字1文字を探すことができ、難読文宇の呼 - 

び出しが簡単になりました〇 J I S 第一水準、第二水準文字完全対応しております。 


登録済の漢字は、30,000語。日常よく使わ 
れる漢字を厳選してあります。さらに、ュ 
ーザーが10,000語追加登録することが出来 
文書作成中から簡単に追加 • 閲覧すること 
もできます0自動学習機能により最終使用 
文字が優先して表示され、使えば使うほど 
変換効率がァップします。単語は、6,000 
語の音訓登録されていて文節変換や HS 変 
換をいっそうスムーズにしています。 

[ 高性能な計算機會旨] 

髙性能な15桁計算することができ、電卓計算 
は、文書作成中にコンピュータのそばに電卓 
があるつもりで使えます。また画面計算は、 
文書内の数字を読み取り計算数値として扱え 
ます0多彩な答え代入機能があり計算によっ 
て出た答えを全角や半角文字で文書内に代入 
できたり、右付けや金額などの自動コンマ付 
けすることも出来ます。 

この計算機能で、単に漢字かな混じりの文書 
作成機としてだけでなく広義の文書作業を達 
成することができます0 


第一水準2965文字 • 非漢字 • 第二水準3384 
文字 • 外字80文字が使え、全角•倍角•半 
角•上つき•下つき （1 S 文字）で表示する 
ことが出来ます。第二水準文字は、システ 
ム内に内蔵されていますので、大変便利に 
使えます。 MZ -1 P 07 の様なドットプリンタ 
でも第二水準の文字を印字することができ 
24ドツトプリンタは、水準 ROM が 
必要です。 

[ 多彩な日口厣 (] 機倉旨] 

ドツトプリンタと24ドツト漢字プリンタ 
の機能1〇〇^舌用し、書式指定で指定され 
た、横書き•縦書きで印刷され文宇間隔 
. 行間隔を1ドット単位にコントロール 
できます。枚数指定や、自動頁付け、部 
分印刷などがあり、各種の案内で宛名だ 
けを変えて何枚も印刷することができる 
差し込み印刷や文書ファイルから指定さ 
れた文書から文書までを指定間隔に再生 
しながら指定枚数印刷できます0 
MZ -1 P 10/11 は、縱倍文字は印字不可能0 


オーノレマシン語 i こよる超高速澳字住所録 


検索速度：1000名中、1人検索時間最高50秒以内 

並び替え ：1000 名並び替え時間5分前後 150名並び替え時間10秒前後 

項目：氏名、フリガナ、電話番号、住所1、住所2、住所3 
郵便番号、備考1、備考2、備考3、備考4 
1200語（県名、市名700語登録済）学習機能付 外字： 95文字 

シングルシール、ダプルシール、ハガキ印刷 

2麟件法 

無条件、同じ、大きい、小さい、含む、含まない 
表示、印字は項目を自由に設定することが出来ます0 (ディスク版） 


機種 

TYPE 

人数 

熟語 

部首 


品番 

価格 

プリンタ 

MZ -1500 

QD 

100 

なし 

あり 

祠能 

V 8.3 Q 

15,000 

MZ -1 P 08 

MZ -1 P 14 

GP -500 Z 

MZ -80 B 

MZ -2000, 2200 

DISK 

DISK 

TAPE 

QD 

1000 

1000 

150 

150 

あり 

あり 

あり 

あり 

なし 

なし 

なし 

なし 

稠能 

稠能 

稠能 

柯能 

V 5.3 D 

V 6.3 D 

V 6.3 T 

V 6.3 Q 

33,000 

33,000 

15,000 

15,000 

MZ -80 P 6 

MZ -1 P 07 

MZ -2000, 2200 

DISK 

1000 

あり 

あり 

内蔵 

V 6.3 DK 

43,000 

MZ -1 P 10 

SS27D 

5S27 

SS27 

SS57turbo 

SS 57 turbo 

DISK 

DISK 

TAPE 

DISK 

TAPE 

1000 

1000 

150 

1000 

150 

あり 

あり 

あり 

あり 

あり 

なし 

なし 

なし 

なし 

なし 

柯能 

柯能 

不可能 

祠能 

不可能 

V 9.3-3 D 

V 9.3 D 

V 9.3 T 

V 10.3 D 

V 10.3 T 

33,000 

33,000 

15,000 

33,000 

15,000 

CZ -800 P 

CZ -8 PD 2 

CZ -80 PK 

CZ -8 PK 2 

EPSON 


热 5 S 

宛名印刷 
検索 


★ 新発売商品 漢字 ROM ( MZ -1 R 13 / CZ -8 KR / MZ -1 R 23 ) が必要です〇 


[P O P 機能] 

SS 57 用ではスーパーインポーズ機能を使つ 
てワープロで作成した文章をバックの色、 
濃度、文字の色、スクロールスピードなど 
を指定して、店頭や待合室、ロービーなど 
でテレビ画面に表示することができます0 

[] 


[ビデオ編集機會铨] 

SS 27 用ではデジタルテロップ機能を使って 
ワープロで作成した文章をバックの色、濃 
度、文字の色、表示行数 （1,2, プロック表 
示）などを指定して、ビデオテープにタイ 
トルや各画面のコメントをビデオ録画でき 
ビデオ教材、ビデオレポート、ビデオ POP 
が簡単に作成できます。 


本体 

品番 

澳字臟 

グラフィック 

プリンタ 


MZ - 200.2200 

V 6.1 DG 

MZ -1 R 13 

MZ -1 R 01+02 

MZ -80 BP 5 

EPSON 

MZ -80 B 

V 5.1 DG 

MZ -1 R 13 

( PI 0-3055) 

MZ -80 BG 

MZ -80 P 6 

MZ -1 P 07 

MZ -1 P 10 

MZ -1 P 11 

SS 27 

V 9.1 DG 

CZ -8 KR 

CZ -8 GR 

CZ -800 P 

CZ -8 PN 1 

5527 D 

V 9.1-3 DG 

CZ -8 KR 

CZ -8 GR 

CZ -8 PD 2 

MZ -1 P 10 A 

5557 turbo 

V 10.1 DG 

— 

— 

CZ -80 PK 

P 7 ODVO 

MZ -1 P 11 A 

U 7-1 D 17 


来01浞の虼-80册,趿-：^07や CZ -501 F , CZ -801 F ， CZ -300 F が必要 ESC / P 09 ESC / P 24 
※卩〗 SK は、2ドライブ必要で MZ -80 B のみ70トラック仕様 - 


文^^ 

J I s 第一水準漢字2965文字+非澳字 ( MZ -1 R 13, CZ -8 KR 必要） 

J I S 第二水準澳字3384文字 ( ディスク内に内蔵 ） 

ユーザー外字 16 X 16=80 文字 24 X 24=80 文字 

システム外字 16 X 16=16 文字 24 X 24=227 文字 

辞書機能 

辞書3万語内蔵+ユーザー辞書1万追加可能 

自動学習機能付き （1 万6千文字）—— （ MZ -80 B は、8千文字） 

文書作成中にユーザー辞書登録.閲可能 


口ーマ^^部首^^ (J I s 第一 • /単! 

J I S コード変換/文節変換/— jg 変換/半角変換 

編集機能 

挿入/削除/訂正/短文消去 • 登録.再生/枠あけ/枠とじ 
倍角指定•解除/ァンダーライン/葑線引き•消去 
文書移動•複写.交換/左寄せ/中央寄せ/右寄せ/袋閉設定•解除 
文書略図/禁則処理/改行設定/桁揃え/電卓計算/画面計算 
上つき•下つき/タブ移動/作表機能/差し込み処理/辞書登録 
語句登録/文頭移動/妓移動/讎一錶示 

文書書式 

プリンタ指定/上部余白/下部余白/左側余白/右側余白 

文字縱倍.普通.行単位/横書き•縱書き.行単位/文字間隔/行間隔 

印刷讎 

枚数指定/頁番号付け/部分印刷/差し込み印刷/連続再生印刷 
再生間隔指定/自動供給機能/横書き/縱書き/倍角文字/半角文字 

24ドットプリンタ完全対応 [ MZ -1 P 10 ( MZ -1 P 17 ) , MZ -1 P 11] 

印刷能力 

MZ -80 BP 5, CZ -800 P -默横 50：^ X 80 行 

MZ -80 P 6, MZ -1 P 07, ESC / P 09, MZ -1 P 10, CZS > N 1 最大横6 〇文字 X 8 〇行 
MZ -1 P 11, ESC / P 24 —-. -行 

mmm 

文書初期化/データ複写/システ厶複写/旧文書再生/文書合成 
文書挿入/文書削除/書式閲繫/機密解除/文書名再生/文書名変更 
自動作表/外字作成 （24/16)/ 外字」接 （24/16)/ 辞書閲覧/辞書登録 
辞書削除/学習登録/学習消去 SS 27 ( POP 表示/ビデオ編集） 

容量 

1文書： 4000文字以内 （ 1文書ファイルに35から240頁） 

1語句： 126文字以内 （ 1語句ファイルに1000語句 ) 


24ドットプリンタは、第二水準 ROM •カツトシートフイーダコントロ ール可能 


商品名 

機捶名 

TYPE 

価 格 

澳字 BAS I C コンパータ 

MZ -80 B 

DISK 

¥18,000 


MZ -2000, 2200 

DISK 

¥18,000 


MZ -2000, 2200 

TAPE 

¥13,000 

澳字フアイル （ KF -1) 

MZ -80 B 

DISK 

¥68,000 


MZ - 2000,2200 

DISK 

¥6 S ,000 

ワープロ ミニミニ 

MZ -2000, 2200 

TAPE 

¥ 7,000 


MZ -2000, 2200 

QD 

¥ 8,000 

★ワープロ ミニミニ K 

MZ -1500 

QD 

¥ 8,000 

( MZ -1 P 17 専用） 

SS £7 

TAPE 

¥ 7,000 


X ワープロミニミニ K は、 横書•縦書.横倍•縱倍 印刷ができます0 
淡 MZ -1 P 17 は、 MZ -1 P 10 と上位コンパチです。 


二 CL レクトロ ノ、ウス 

株式会社 スガャ 
〒416静岡県富士市長通 104-3 電話番号 (0545) 61-1417 (代) 


お求めは全国マイコンショップ又は当店宛に現金書留（送料サービス）に機種名及び 
プ亡グラム名を書いてお送り下さい0 営業時間 AM 9:00 〜 PM 7:00 

振込口座清水銀行富士支店（当座）5683 定休日毎週水曜日•第3日曜日 


上記内容は、 A 3 用紙に NEW mini で MZ -1 P 11 を使って印刷しました, 




























































參夕亡養診#沴吞务备咎ひ欠 


Micro Port 



• SH Ai^PH/7 シリ ー乂 h±mjrixj 

( ディスク版 /5 インチ）（カセット版） 

¥8,800.¥3,800 

※カセット版は XI D では使用できません。 



(フロッピーディスク版/3インチ .5 インチ） 

¥70,000 ( VerG ) 

*2 ドラィブ要 

• SHARR lllZ-S(5Xolo1/SAS-2102 

(フロッピーディスク版/5インチ） 

¥70,000 ( Ver 日）兹2ドライブ要 



① 既製の学習ソフトに比べて、問題作成の優れた自由 
性•独自性。 

② 教科ジャンルを超えた汎用性。 

③ 自分で作成すること:: ct る経済性。 

④ テスト終了後、問題数•正解数•誤答数•正解率を表示。 


⑤ 再テストができ、正解するまで繰り返すことが可能。 

⑥ 問題を自由にセーブ•ロードすることができ、ライブラリー 
を作ることが可能。 

⑦ 用途{访らゆる教科の(妫、、工夫次第で無限。 

※プログラムフロッピーに5種類のデータが付いています。データの種類は 
• 英単語* BASIC 言語*百人一首*社会科籲算数の公式です。 

(ディスク版） 



売買のタイミングを効率よぐ個別総合分析。 

①初めて''個別総合分析"を設け、効率よく売買のタイミングを 
つ力心ことが可能。②ローソク日足+分析という項目を設け、デー 
夕の判読が一層容易。③各種チャートの敁後に、本日のローソ 
ク日足を表示。④各種レシオの計算表も表示。⑤カラーインク 
ジェットプリンタが使用でき(ただし、 MZ - 2000のみ。また、シリアル 
プリンタ使用も可能。)しかも非常に大きい幽面。⑥非常にお求め 
やすい価格〇⑦バージョンアップ•バグ発生時のフロッピー交換、 
その他メンテナンスも万全。 


(株価分析シリーズ） プリントアウト可能な項目=レシオ、登録コード、人カデータ 

ポケコン PC -1350 用 システ^販売 ’86 年 1 月発売予定 どこへでも持ち運び 0 K / 

周辺機器 GE-126、RAM 力ード 202M(16K) 



豊富なデータで、商売繁盛。 

顧客のコード No . •住所•郵便番号•逛話番号•顧客および家族 
(計7名）の氏名•生年月日•各種記念日の名称および日付•購 
入品目（計10品）の名称•型#•価格•購入日•クレジットの有 
無(開始日•終了日） 


マイ家計簿 


參シリーズ(カセット版) 

¥4,800 ※父彳 D では使用できません。 


"わが家〃の家計を、コンピュータ管理0 


製造元 


マイク□ポー h 


0(078)801-5181 

亍657神戸市灘区船寺通り5丁目 3-8 


% 


卜上記ソフトのお求めは x お近くのマイコンショップ、または当社まで。なお、当社へお申し込みの場合は、現金書留でお願い致します。 


く取り扱い店〉㈱日本ソフトバンク•㈱ 0A アプリケーションズ•㈱イワ4•近畿システムサービス㈱•ジャパンソフトサービス㈱•㈱フタバ図軎•㈱ソフトウェアジャパン•誠光堂書籍㈱ 
， ※パンフレットを用意しております。資料をご請求ください。なお、ご希望の資料の通し記号❶❷❸〇をハッキリお書き願います。 

\ヽパ、' 


















新キ情いいしコいとスこ 
鮮ミ報まつかミろにベれ 
なもはやそちュんかシが 
情 H 食現う口'二なくヤ J 


g I は 


自の 




IL 


ぞ、バソコ 


小旅行惝報 

小ホットラインマガジン 
JSP からのお知らせ 



#巳巳 S (電子掲示板) 


不特定多数の人に、自由にメッセージを送 
れるシステム。 HOT LINE を通じて、いろい 
ろなコミニュケーシヨンの輪が広がっていま1； 



#八ード情報•ソフト情報 

新製品 ニ ユースが早く入手できる早耳情報。 
特に主要ハードメーカー.ソフトハウスからの 
情報の収集がシステム化されよ叭、っそう充実 
I 、たしました。 



•電子メール 



• JSP からのお知らせ 




お買得品情報、イベント情報、各種セミナー 
ご案内などお役に立つ情報がいっぱい/ 
全国最大の実績から生まれた J & P の「ゾフ 
卜人気べスト 10 j の発表は各方面に大きな話 
題を提供 U ： います> 

パソコンによる通信販売システムも計画中 
です 0 

•その他 


楽しい話題満載/みんなでつくる電子版パ 
ソコン月刊誌です。 

► 今月のホットラインニュース大贫 
►コンテンポラリーワーズ 
►通 { こなろう/ホットラインうま I * 、ものガ仆' 
►知らぬと損する法律ガイド 
► 幸運にアクセス、今月の星座占い 
►新刊ニュース 


海外の悄報ゃ毎月のパソコン雑誌の主要記事が発売 [ T 前に見ることができます。この{妙、現 
在さまざまなジャンルの企業 UP 提携を交渉中。ますます世界力拡がも卞ットラインにご注目下さい/ 


パゾコンで特定の人に、手紙より早く、電話 
より確夫にメ、パ:ージを送れま北アメリカでは 
すでに、ビジネスマン(お朝、自分の メール ボッ 
クスを確認することから一日が始まると言われ 
るほど普及していま1"。 


旅行情報 

「ぴあ」などの情報サービス企業とガ、汗リ提 
携〇いつ、どこで、だれのコンサートが開かれ 
るか、またそのチケットの前売状況はなど、知 
りた、悄報力倨ながらにして得られます。 


東京•渋谷に… 第 e センタ-開設/ 


関東地区を中心に、第二次会員募集/ 

第二次会員にお申し込みの方は、ハガキに住 
所、氏名、年齢、職業、電話番号、使用マシンを 
害いて下記までお申し込み下さい。折返し詳し 八で"“ w •— 

い申し込み案内と要項をお送りさせて頂きます。 

(締切昭和60年12月31日） 

宛 先：〒150東京都渋谷区道玄坂2丁目28番4号 


但し先着1.000名様限り 


お問い合わせ 


j & p 渋谷店 j&p H ( yfxr > r 却 事務局 
0(03)496-4141 


司 事務局 


万全のサポート体制で全国をネットするパソコンの大型専門店チェーン。 


渋谷店 東京都渋谷区道玄坂2丁目28番4号 55(03) 496-4141 
町田店 東京都町田市森野1丁目39— 16 0(0427)23-1313 
八王子店 東京都八王子市旭町1番1号八王子そごう 7 F «(0426)26-1141 
亍クノランド 大阪市浪速区日本棰5丁目6番7号»(06) 644-1413 
メディアランド 大阪市浪速区日本棰5丁目9番11号 0(06) 644-1613 
ビジネスランド 大阪市北区梅田卜 1-3 大阪駅前第3ビル B 2 3(06) 348-1881 
阪急三番街店 大阪市北区芝田 1-1-3 阪急三番街 B 10(06) 374-3311 
高槻店 高槻市高槻町11一16 0(0726)85-1212 


くずは店 枚方市楠葉並木町2 丁目 2-2 3(0720)56-8181 
千里中央店 蓮中市新千里東町 1-3-204 千里サンタウン 3 F 0(06) 834-4141 
京都寺町店 京都市下京区寺町通仏光寺下ル恵美須之町549 0(075)341-3571 
姫路店 姫路市東延末彳丁目1番住友生命姫路南ビル 1 F 0(0792)22-1221 
和歌山店 和歌山市元寺町4 一 8— 〗»(0734)28-1441 
栄ノバ店 名古屋市中区栄3 丁目 4-5 SAKAE N 0 VA 6 F »(052)26卜9201 
四日市店 四日市市鵜の森2— 1-19 25(0593)54-3366 
津 店 津市丸之内 31 — 20^(0592)26-0111 





























































qO^? 

wbpIP . 一で評， 0 ニフト，荽場。 


新作ゾ 


J IlliU U^JiyjlUJ 標準価格89,800円 

籲キャラクタづくりも自在、強カグラフィック機能•音楽演奏もお手のもの、 
C ：>,> のサヴンド@能#上に*^ねせて m イ匕するクリーン胃言十#ぼナ^ク> 

とアップさせる RAM ファイル(オプション)癱おしゃべりも OK、 ボイスボード(オプ 
ション)秦買ったその日から即使える実用ソフトつき。 

胃 ▲写真の14型カラーデ f スプレ TCU -14 F 1 B 標準価格64,800円 t 犲プションで t •。籲 CRT 画面ルヽメコミ合成で「ギャラガ J(© ㈱ 

ナムコ)より。またその他の画面は「口ードラン^-」(ユニバース)/ K 7 K 7 mkIIj (エニックス)、「ユーカラ J J j (東海クリエイト)、「ミュー 
ジックダンス j (口ータス)、「サンダーフォース」(テクノソフト)より。* a —ドランナーは USA Broderbund Software Inc の登録商標です。 

•新作ソフトも続々登場、いよいよ充実してきた QD アプリケーション 


SHARP 


ウォーリイ 


4,800 


マイクロキャビン 


ギャラガ 


4,500 


電波新聞社 


ビジネス 


ユーカラ JJ ( MZ -1 P 17 専用） 


12,800 


東海クリエイト 


NEW V!P 


12,800 


デービー ソフト 


マジックファクトリー 


5,800 


コムパック 


中学数学シリーズ 


各4,500 


信長の野望 


5,800 


光栄 


学 習 


中学英作文シリーズ 


各7,800 


野球狂 


5,800 


ハドソン販売 


中学•高校社会科シリーズ 


各4,500 


編: 


•上記のソフトはほんの一例です。詳しくは APPLICATION NEWS * をこ覧ください c 楽口ードランナーは USA Broderbund Software Inc の登録商標です。 

式会才1本社〒545大阪市阿倍野区長池町22番22号大代表)•お問い合わせは…本社内国内情報システム営業本部まで。 


iiiilllZ ㈱II 本ソフトバンク発行 Printed in Japan 定価480円 雑誌02179 
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